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Nesta edicao de junho, MICRO SISTE- 
MAS traz urna interessante reportagem 
sobre o Japao e seus projetos de avan- 
pada tecnologia. AI6m disto, procuramos re- 
fletir sobre as caracteri'sticas culturais deste 
povo. que possibilitaram a reviravolta: de um 
pais devastado pela guerra a uma das maiores 
potSncias da atualidade, admirada pelos povos 
ocidentais que deveriam meditar sobre os 
ensinamentos que sua sabedoria milenar nos 
impBe. 

No Japao, pais capitalista que guarda pro- 
fundos valores humanitirios, o espirito nacio- 
nalista se traduz em trabalho de equipe; a 
ordem 6 unir esforfos. Assim 6 que empresas 
concorrentes conseguem juntar-se em proje- 
tos comuns de pesquisa, incentivadas por um 
Estado participante, e avancar a ponto de 
por em risco ate" a sdlida hegemonia tecnold- 
gica dos EUA. Problemas existem, e o desen- 
volvimento de software 6 o mais grave deles 
— o que sera" abordado em edigao futura. No 
entanto, com uniSo e trabalho, os japoneses 
estSo conseguindo superar as dificuldades im- 
postas por sua lingua. 

Para nds, esta deve ser uma grande licao, 
Justo no momento em que fala-se em organi- 
zar e legislar o mercado brasileiro de progra- 
mas para computadores. Nesta hora, tanto 
podem ser tomadas medidas pr.lt icas e realis- 
tas como podem criar-se mais entraves e 
rituais burocriticos que em nada ajudarao 
ao setor e ao usuirio. Ao contririo, coisas 
como registros obrigatdrios e restricBes a 
pacotes consagrados como padrdes interna- 
cionais constituem perda de dinSmica, atraso 
garantido e controle policial, quando o tema 
comercializacao e uso de software requer mais 
6 cultura e discernimento de nossos usuirios, 
com o devido incentivo as universidades e 
empresas nacionais que trabalhem no desen- 
volvimento de solucoes prdprias. 

O que 6 lamentivel, contudo, 6 que justo 
agora os que deveriam estar direcionando uma 
discussSo apropriada da questao parecem 
nSo se entender. O MCT diz ter concluidos 
documentos e propostas de lei que a SEI 
demonstra ignorar. E a Assespro — unica enti- 
dade representativa das software-houses e 
bureaux — ao invis de se movimentar para 
congregar tambim os empresArios das micro 
soft-houses, representantes de best-sellers es- 
trangeiros, etc, de modo a tornar a discussao 
mais ampla, perde-se em briguinhas de poder 
e provocacBes bairristas, que bem demons- 
tram a total incapacidade que temos de con- 
tornar as desavencas particulars em prol dos 
interesses nacionais. Tal atitude nacionalista 
(nao confundir com demagogia), justamente 
o que nos falta, 4 o que os japoneses tSm de 
sobra. E que os tern levado a um sucesso 
inegivel em variados aspectos. 
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O sorteado deste mes, que recebera uma 
assinatura anual da revista MICRO 
SISTEMAS, e Glaciene Pereira Tavares, 
de Maceio-AL. 



DUVIDASSOBRE DGT-1000 



Possuo um equipamento DGT-1000 com 48 
Kb e um drive, tenho algumas duvidas e gosiaria 
de esclarece-las. Gostaria que me informassem 
se existe um manual que explique os comandos 
do DIG-DOS, pois o manual que o acompanha 
nao demonstra nem a metade dos comandos 
apresentados pelo comando LIB do DIG-DOS. 
Tambem desejo saber se ha algum outro sistema 
operacional que rode no DGT (diferente do 
CP/Me do DIG-DOS). 

Pretendo adquirir programas em linguagem 
de maquina nos Estados Unidos e gostaria de 
saber se os programas para o TRS-80 model o 
I rodam perfeitamente no DGT e se o sistema 
operacional do TRS-DOS 6 compati'vel com o 
DIG- DOS. Quero saber ainda qual a velocidade 
de transferencia para a fita no TRS e se ela e 
compati'vel com a velocidade de transferencia 
do DGT. 

Por ultimo, desejo saber quais os sistemas 
operacionais compati'veis com o DIG-DOS. 
Alessandro Zimmer 
Rio de Janeiro - RJ. 

Prezado Alessandro, conforme fazemos 
habitualmente, enviamos sua carta a Digitus e 
recebemos a seguinte resposta: 

"Com relacao ao manual do DIG DOS 
100, informamos que ha dispom'vel um manual 
{em ingles) do NEW- DOS, compati'vel com o 
DIG-DOS 100 utiiizado em seu microcompu- 
tador. Atrave~s dele, voce descobriri que o DIG- 
DOS 6 um Sistema Operacional com muitos 
recursos, e que por isso foi selecionado pela 
Digitus para ser implementado no DGT- 100/ 
1000. Na realidade dispomos de outro Sistema 
Operacional, o DIG-DOS 10, compati'vel com 
o TRS-DOS do TRS-80 americano, mas ele 
6 muito inferior em recursos e capacidade ao 
DIG -DOS 100. 

Para que os programas adquiridos nos EUA 
rodem no DGT-100/1000, eles devem ser ba- 
seados no NEW-DOS 2.0. Entretanto, devese 
observar que programas em linguagem de mi- 
quina com acesso direto aos drives (independen- 
te do suporte do sistema), nao rodam, pois o 
TRS -80 1 tern drives de densidade simples, e o 
DGT- 100/1000 funciona com drives de densi- 
dade dupla, e o DIG -DOS foi alterado para isto. 
Portanto, um acesso ao disco que nao seja 
atrave's do Sistema Operacional nao funciona- 
ri. Tamb6m deverao ser evitados programas 
que acessam a RS-232C, pois no DGT- 100/ 
1000 ela foi bem melhorada em relacao a 
original, mas precedeu-se a compatibilidade 
em alguns pontos. No restante, programas no 
NEW- DOS II em BASIC que nao utilizam roti- 
nas de miquina funcionarao bem em seu micro. 

O seu DG T- 1000 pode ler e gravar fitas cas- 
sete nas velocidades de 2000 ou 500 bauds, 
selecionavel por software (vide manual de BA- 
SIC e manual de operacaol. Como nao existe a 
velocidade de 2000 bauds nos TRS-80 ameri- 
canos, voce podera' adquirir fitas na velocidade 
de 500 bauds, que poderao ser lidas pelo seu 
micro. 

Informamos finalmente que vocS podera 
remeter para a Digitus seu nome e endereco pa- 
ra receber o Informativo Digitus, que enviamos 
a nossos usuarios cadastrados com informacoes 
interessantes sobre nossa linha de produtos. 
Para esclarecer qualquer duvida, bem como 



solicitar manuals, voce podera procurar, no Rio 

de Janeiro, nossa filial localizada a Rua Barata 

Ribeiro, 391, sala 404, tel.: 1021) 257-2960, 

Copacabana. 

Marcos Birchal de Mora 

Diretor Comercial — Digitus. 
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Preciso de uma prancheta grafica e outros 
softwares do Macintosh e gostaria que possi'veis 
fornecedores entrassem em contato comigo. 
Quero manter contato com usuarios deste mi- 
cro, para troca de correspondencia e programas 
e desejo ainda o endereco do Clube Macintosh, 
em Brasilia. 

Sou fanatico por neuro-oftalmologia e 
preciso contatar colegas que estejam procuran- 
do, como eu, desenvolver programas nessa area. 
Meu endereco e Praca Wenceslau Braz, 100, 
CEP 37.500. 
Antonio N. Goncalves (Itajuba - MG). 
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Simplesmente excelente o artigo do Pierre 
Lavelle, "C6pia de Programas: Ataque". 36 la- 
mentei muito nao possuir um TRS-80, para 
usar as dicas do Leo contra os "Piratas de Pro- 
gramas". Sera que ele poderia adapta-las para o 
CP 400, TRS-80 Color e compati'veis? 

Tenho um CP 400 e gostaria de trocar ideias 
com usuarios desta linha. As correspondencias 
podem ser enviadas para a Rua Areolino de 
Abreu, 1349, 5 9 andar. CEP 64000. 
Francisco Soares da Silva 
Teresina - Piauf. 
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Sou assinante desta conceituada revista e gos- 
taria de parabenizi-los pelo curso de FORTH, 
de Antonio Costa Pereira. 

Estou organizando um clube de usuarios de 
I6gica Sinclair e MSX; os interessados podem 
trocar informacoes comigo atravrjs do seguinte 
endereco: Alameda das CrisandaJias, 532, Ci- 
dade Jardim, CEP 13560. 
Joao Paulo Cavalheiro (Sao Carlos - SP). 

Estou fundando um clube para troca de pro- 
gramas entre usuarios de ZX81; TRS-80; 
Apple; ZX Spectrum; TRS-Color; MSX e 
Sharp (micros PC- 1500). Para tornar-se s6cio, 
envie nome e endereco completos; data de nas- 
cimento; telefone; micro que possui e um pro- 
grama para o micro em questao (listagem). 

Para cada programa enviado, voce tera di- 
reito a outro (a sua escolha). Enviaremos, assim, 
ap6s o recebimento de sua carta, uma lista de 
programas sempre atualizada, para que voce 
kidique qual deseja obter. Cartas para a Av. 
Dioni'sio Lothario Chassot, 463, CEP 99490. 
Wilson Afonso (Tapera - RS). 



N. R.: Em virtude da grande quantidade de 
cartas que temos recebido. passaremos, a 
partir deste mes, a sortear a assinatura entre 
todos os leitores que nos escreveram, e nao 
apenas entre aqueles que participaram desta 
Secao. 



Envie sua correspondencia para: ATI — Analise. 
Teleprocessamento e Informatica Editora Ltda., 
Av. Presidente Wilson, 165/gr. 1210, Centro. 
Rio de Janeiro/RJ, CEP 20030, Secao Cartas/ 
Redacao MICRO SISTEMAS. 



O que f az uma empresa crescer 
sao grandes ideias. 




Ate hoje, as empresas dispu- 
nham de duas opijoes para sua 
informatizacao: utilizar grandes 
computadores, o que significa 
grandes investimentos e a ga- 
rantia de solugdes completas e 
duradouras, ou Microcomputa- 
dores, de custos menores, mas 
cujas limitagoes de capacidade 
e crescimento comprometem 
o resultado final, causando 
frustragoes. 

Agora isto e passado com o 
langamento do Supermicro- 
computador M1001-Slim, a 
grande ideia que vai revolucio- 
nar a automacao das empresas 
de pequeno e medio porte e au- 
xiliar na descentralizagao de 
servigos das grandes 
empresas. 

OM1001 -Slim, de 16/32 Bits 
e capacidade multiusuario/mul- 
titarefa, foi desenvolvido para 
operar com ate 5 terminals. Ele 
e o mais novo membra da fami- 
lia de Supermicros M1001 da 
Medidata, o que Ihe garante 
uma completa biblioteca de 
aplicativos administrativos e 
gerenciais amplamente testa- 
dos e recursos ineditos como 
o Tele-Su porte. 

E por ser da Medidata, uma 
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empresa gue acumula 10 anos 
de experiencia no fomecimento 
de solugoes de informatica, sua 
empresa tern a certeza de con- 
tar com servigos de manuten- 
gao e suporte totais. reconheci- 
dos como os de melhor nivel da 
industria nacional, sem que te- 
nha que pagar a mais por isso. 



E, na medida que a sua em- 
presa cresce, voce conta com 
opgoes de expansao, com apro- 
veitamento dos seus investi- 
mentos em software e periferi- 
cos, gragas a compatibilidade 
do M1001-Slim com os demais 
computadores da Medidata o 
Micro M-XTtambem compati'- 
vel com O IBM-PC/XT, o Super- 
micro M1001, para ate 16terminais 
e os Minicomputadores M2001 e 
M3001 para ate 64 terminais. 

Connega o Supermicro 
M1001-Slim. Mais uma grande 
ideia da Medidata 



"Inmedidata 

•• • a logica sob medida 



Rio (021)542-3737 

Sao Paulo (011)288-3522, ate 30/05. 

A partir de 1/06,523-0960 

Campinas (0192)31-0903 

B. Honzonte (031) 226-5719 e 226-5045 

Brasilia (061)225-6745 

Salvador (071)233-1512 

P. Alegre (0512)42-8530 



SUPERMICRO M1001 SLIM DA MEDIDATA. 
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Esta e uma boa hora para se aprender a armazenar e recuperar 
telas em alta resolucao no TK90X com algumas rotinas em Assembler. 



Super telas 



.Nelson N. S. Santos. 



RAND USR 57012. Voce deve ver a sua tela anterior instan- 
taneamente de volta. 

Isto pode ter varias aplicafSes. Uma delas pode ser armaze- 
nar a tela de um jogo quando for necessirio interromper para 
uma tela de help ou para um menu (bastante comum em 
adventures). Outra possibilidade € movimentar algo atraves de 
um fundo detalhado, sem alterar este fundo. A ideia e a se- 
guinte: crie o fundo, armazene-o, imprima o seu "algo", recu- 
pere a tela de fundo (apagando o "algo"), imprima o "algo" na 
nova posic3o, e assim por diante. O efeito 6 veloz e literalmen- 
te impossi'vel de ser obtido em BASIC. Como ilustrac2o, com- 
plemente o nosso programa: 

60 BORDER 6: PAPER 0: CLS 
70 LET r ' 1 

80 FOR f = 1 TO 181 STEP 5 

90 CIRCLE INK (RND * 6) + 1; f, r, r: LET r = r + 2 
100 NEXT f 

As linhas anteriores criam um fundo de ci'rculos coloridos, 
produzindo a ilus5o de um cone em terceira dimensao. 

110 RAND USR 57000 

Isto armazena a figura criada. 

120 PAUSE 90: CLS: PAUSE 90 

DS uma pausa, limpa a tela, e a mantdm limpa por alguns 
instantes. 



O loop anterior recupera a tela com o cone, imprime 
TK90X, recupera a tela (apagando os caracteres), imprime 
TK90X mais acima e mais a direita etc. 

A ferramenta que apresentamos podera" incrementar bastan- 
te seus programas. 

ALTERACOES PARA 16 KB DE RAM 

Linha 10 - CLEAR 24999 

Linha20 - FOR f = 25000 TO 25023 

Linha 50—0 niimero 223 deve ser trocado por 98, e o ende- 

reco de ini'cio do nosso arquivo de tela passa a 

ser 25088 (98 x 256 = 25088) 

A rotina de armazenamento deve ser chamada por RAND 
USR 25000, e a de recuperar por RAND USR 25012. 
Linha 1 10 - RAND USR 25000 
Linha 120 - RAND USR 25012 



Com duas rotinas simples e pequenas em linguagem 
de maquina, sera possfvel produzir efeitos de tela 
impossfveis de serem obtidos em BASIC. 
A primeira das rotinas arquiva uma tela completa 
em alta resolucao (incluindo os atributos de cor), e a segunda a 
recupera, reimprimindo-a de maneira aparentemente instanta- 
nea. 

Para arquivar a tela de alta resolucao, sSo necessarios quase 
7 Kb. Assim sendo, se voce tern um TK90X de 16 Kb de RAM, 
vao lhe sobrar apenas 2 Kb para o programa BASIC, pois 14 
Kb de sua RAM serio ocupados pelos arquivos de tela — o 
usual e o seu novo arquivo. Se seu TK90X tern 48 Kb, entSo na"o 
hi grandes problemas, pois vlo lhe sobrar 34 Kb para seu pro- 
grama BASIC. 

Super telas esti escrito para micros com 48 Kb de RAM. 
Se voce tern apenas 16 Kb, consulte a lista de alteracOes no 
final desta materia. 

Comecaremos o programa BASIC com CLEAR 56999, para 
reservar a drea de endereco 57000 em diante para a rotina em 
si e para o arquivo. 

A rotina de armazenamento da tela 6: 



LD HL, 


16384 


21 


00 


40 


33 


64 


LD DE, 


57088 


11 


00 


DF 


17 


223 


LD BC, 


6912 


01 


00 


IB 


1 


27 


LDIR 




ED 


B0 




237 


176 


RET 




C9 






201 





Vamos entender. Para usar LDIR, que e uma instrucao de 
transferencia de blocos, HL deve conter o endereco de partida. 
Este 6 16384, o ini'cio do arquivo de tela do micro. DE deve 
conter o endereco de destino (impossi'vel esquecer: DEstino); 



escolhemos 57088 como ini'cio do nosso arquivo (223 x 256 
= 57088). BC deve conter o niimero de bytes a serem transfe- 
ridos (fdcil de guardar): BC = Byte Counter). Este niimero 6 24 
x 32 x 8 (tela de alta resolucao) + 24 x 32 (atributos de tela) 
= 24 x 32 x 9 = 27 x 256 = 6912. 

LDIR 6 uma das mais poderosas instrucocs do Z80. Ela 
realiza LD (DE), (HL), seguido de INC HL, INC DE e DEC BC; 
e repete este ciclo at6 que BC seja zero. 

A rotina de recuperacao da tela e quase igual. Veja: 



LD HL, 


57088 


21 00 


DF 


33 


223 


LD DE, 


16384 


11 00 


40 


17 


64 


LD BC, 


6912 


01 00 


IB 


1 


27 


LDIR 




ED B0 




237 


176 


RET 




C9 




201 





Observe como apenas foram invertidos os enderecos de par- 
tida e de destino. 

Para colocar estas rotinas na mcmoria do computador, digi- 
te: 



10 CLEAR 56999 
20 FOR f - 57000 TO 57023 
30 READ a: POKE f, a 
40 NEXT f 

50 DATA 33,0,64,17,0,223,1,0,27,237,176,201,33,0, 
223,17,0,64,1,0,27,237,176,201 

Rode o programa. Nada observdvel acontece, mas o codigo 
de maquina esta na mcmoria do micro. 

Para verificar, imprima qualquer coisa na tela e digite o 
comando direto RAND USR 57000. Limpe a tela e digite 
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130 FOR f - TO 19 

140 RAND USR 57012 

150 PRINT AT 20-f, 6 + f; PAPER 6; INK 0; "TK90X" 

160 NEXT f 



Nelson N. S. Santos desempenha atualmente a funcao de Editor na edi- 
tora Campus. Usuirio da linha Sinclair, eleji trabalhou como Consul tor 
Ticnico na Area de linguagens, sendo tambim autor do livro "AI6m 
do BASIC", publicado pela Campus. 



E melhor voce entrar na linha. 

Software Ne compatfvel com a linha IBM-PC. 



Chegaram os exclusivos 
sistemas da Nasajon. 

Folha de Pagamento, 
Contas a Pagar/Recebery 
outros. 

O sistema de 
Contabilidade, por exemplo] 
faz o trabalho de todo o mes 
em apenas 2 boras. Permite 
o cadastramento de historicos 
padronizados e de piano de - '-'■* 
contas com ate 5 niveis. 




Emite diario, razao, 

balancete , balango, 

'ff^' demonstragao de lucros 

e prejuizos acumulados, alem 

' de listagem por centro de custo 

e extrato de contas. 

E ou nao e melbor voce entrar 

na nova linha? 

Cada sistema custa apenas 
Cz$ 9-300 , incluidas ai a alta 
tecnologia e toda a tradigao 
da Nasajon. 



^na/cuon 

■"■ /l/tefTlQ/ 5 anos de 
Tecnologia em Software 



Av. Rio Branco,45 Gr 1311 - RJ 
Tels.: (021)263-1241 e 233-0615 



Breve Filial em S. Paulo: 
R. Xavier de Toledo, 161 - conj. 106 




Luciano Nilo de Andrade 



Avangard, a nova estrela 



A Fidelity Electronics, empresa 
norte-americana especializada 
na fabricacSo de micros para 
jogar xadrez, acaba de anunciar a co- 
mercializacilo do seu novo micro, o 
Avangard. Mais potente e sofisticado que 
seus aparelhos anteriores, esta sendo 
oferecido a US $ 800. 

De tamanho igual e acabamento ex- 
terno primoroso, como o dos modelos 
Elite por ela fabricados e )i descritos 
nesta coluna, e a principal novidade para 
este inicio de ano. 

Sua principal inovagSo e a de vir com 
dois relogios embutidos na margem do 
tabuleiro paralelamente a coluna do TR. 
Isto torna possivel a dois jogadores se 
defrontarem normalmente, atuando o 
micro como juiz da partida a flm de que 
nao sejam feitas jogadas ilegais. Como 
ele e sensorizado, os jogadores n3o pre- 
cisam aciona-lo ao fim de cada jogada. 

Assim, a contagem do tempo e feita 
automaticamente ap6s a colocacao da 
peca em sua casa, exigindo, ainda, manu- 
seio educado das pe$as, penalizando os 
jogadores estabanados. 

A potencia do novo aparelho e de 5 
Megahertz, um Mega a mais que o seu 
antecessor, o Elite AS4. 

O rating anunciado do Avangard e de 
2.203! Contudo, a USCF (Federacao 
Americana de Xadrez) atribuiu-lhe,pro- 
visoriamente, o rating de 2.173, depois 
da participacSo deste micro em recente 
campeonato norte-americano aberto. Es- 
te e um resultado recorde porque corres- 
ponde ao rating de mestre da FIDE, ulti- 
mo degrau para o acesso a mestre inter- 
nacional. 



KAROL WOJTILA 



KAROL WOJTILA 



KAROL WOJTILA 






1 - As brancas jogam e dao 
mate em duas jogadas. 



2 - As brancas jogam e dao 3 - As brancas jogam e dao 
mate em duas jogadas. mate em tris jogadas. 



Na primeira prova em que competiu 
com outros micros, o Avangard venceu. 
Isto ocorreu em Mobile, estado de Ala- 
bama, EUA, em julho de 1985, quando 
da realizacao do Computer Chess Cham- 
pionship. 

A classificacao final foi a seguinte: 
Campeao, Avangard com 5 ,5 pts. ; 2?) 
Bebe, 4,5; 3?/4?) Novag Y e Novag X 
com 4,0; 59/8?) Belle, Vangard Fideli- 
ty, Mefisto Modular e Fidelite Elite XA 
com 3,5; 99/11?) Super Constellation 
X, Turbo Star X e Mefisto Modular S 
com 3,0 pts. Ao todo, haviam dezoito 
concorrentes. 

O enxadrista Joao Paulo II 

O Papa Jo5o Paulo II, o Jo3o de Deus, 
como carinhosamente o chamaram por 
ocasiao de sua visita ao Brasil, ja teve 
sua atencSo voltada para o jogo de xa- 
drez. 

Era entao estudante de teologia e cha- 
mava-se Karol Wojtila quando se iniciou 
na arte de compor problemas. Seu ini- 
ciador foi Marian Wrobel (01/01/1907 a 



25/04/1960), problemista polongs reco- 
nhecido mundialmente por seus mais de 
70 premios conquistados com proble- 
mas de mate em duas ou tre"s jogadas. 
Este intelectual encontrou lenitivo no 
xadrez para sua prolongada enfermidade 
6ssea, que o deixou quase parali'tico. 

A seguir, apresentamos tres proble- 
mas compostos por Sua Santidade no 
tempo de seminarista. 

Solucoes: 

3JEUI jxje DM+393'Z UK ID=88d I - £ 

iqxdi-i 



,-i'l 



Enxadrista experiente, Luciano Nilo de An- 
drade ja" escreveu para os jornais "Correio 
da ManhS", "Data News", "Oltima Hora" e 
para a revista "Fatos & Fotos". Luciano 6eco- 
nomista, e trabalha atualmente no Ministe'rio 
da Fazenda, no Rio de Janeiro. As opiniSes e 
comentirios de Luciano Nilo de Andrade, 
bem como as ultimas novidades do xadrez jo- 
gado por computadores, u star So sen i pre pre- 
sentes em MICRO SISTEMAS. 
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MANUAISORIGINAIS 



JOGOS CONSAGRADOS - CZS 130,00 

AjDDf AKALABETH Finitltlcee.eolg/a mimed*. 

AJ051 APPLE FROGGER - Um (ojo para ttlt*r MU i r.lla.ot. 

AXK19 AHCHON - A.cr>t u rarfeii;.'ate>» **i4o!S4K). 

A.*J30 ASTEROIDS -Oci!fuJ0mrndi<5.1(Wtlp»(O. 

AJOW ATARI PACMAN - O WW do fl.pe.am , 

AJ071 AUTOBAHN-Um|oe W ,nc>i l elOe* t Jo.nl.nta. 

A»?a BANDITS - Bandidoi HpKU Qu «irm roubiio. 

AJQ92 BATTIE FOR NORMANDY - OmmM-tp* m Normervgia 

AJ101 BIRTH OF THE PHOENIX - Gu«'re.roi* Maooiam Iji. 

AJ054 80LO-O*l*r>q.*lrj*ttr u <r*ooin;m.}o. 

AJ029 BUG ATTACK - Bfllivmo (ojo eipaoil. NIo petal 

AJQ60 CARTELS* CUTHROATS ■ Slmutaolo * mpretar.el. 

AJ1I7 CASTLE WOLFENSTEIN - A. ,.,<„•, «n ,,.„, ■-, „,„„ _ 

A>D33 CASSINO-CatwiarompleioparaiuJdiveilto. 

AJ0I8 CHECKERS- FanliltliOiOio 0*dam*i. 

AJ069 CONGLOMERATE COLLIDE S>mwi*ca\»*mpr*»«.*i. 

AJ047 CONGO - Condura a can : > no r.o turbulento. 

AIO») CONGO BONGO - Annlu- 1 trufc-renirWHl <ij A' r-CO. 

AJOK COPTS* HOBBEPS~P<'MJv'cl?i9l>D«tn(o. 

AjOS.- DEADLINE Intniim. *,entu.# pol-Ml. 

AJ024 OEFENOER - Oetl.u* *l n»v« .n.n*>>i Ooyil.<*). 

AJOI4 DONKEYKONG-Lrmcliii.codoll-per.ma. 

AJ056 DRAGON'SEYE- Av*nt„ra eomawino.er 

AJ0« EGGSlT-Umd».ert.ck>et4C|uecomQ*Ol. 

AJ099 EPIDEMIC - Lule font', a tirmel jpidtnV.. 

AJI02 ESCAPt FHOMRUGSTEIN Fvil dj D..l*j. 

AJ046 EVOLUTION - Um|M<> »"• «**•"• Mm n*«wi 

AJ079 FACE MAKER - CooiUui (oi;«| #"-iydo,. 

AJD3? f AMILV ROBINSON - AilO.OI Robwiv; 



■ 1 —dPI . 



m hoir4»f(Hrio. 



.-'.kjk.. 



AJI0S FIFTY MISSION CRUSH -P 

AJ044 FLYWARS-Umi0B3*»e*iii- 

AJ>49 FOOTBALL - Jojv fwWtMl eoot.« o n"«.i>. 

ajow gammon -tfuitmttttad»t>m*»tn9mmn 

AJ09b GERMANY 1965 - S-m-»«J-J d« Qjti- n» Alim*oh«. 

AW70 GORGON -Jo ? >,ipK^I*m3d,mtM0»|, 

A/»? HAORON- Jo)Otip«iil«m3d.in«o*Mi. 

A*W5 HIGH ORBIT - FsnU<t-a »wi cit.lv, 

AJ13I HITCHIKCR'S GALAXY - Fictfo tmewtu 

AH53 HOUSE OF USHER - ^nv.lhou ..»"W'# •"•n«d*. 

A/345 HOUSKATTACK - Sc,j .i ( >*t * vtna mm 9ulk). 

A»IJ I.O. SILVER - Cm .01 ljii.i<r«i 

A»i1 KAMIKAZE - OHfndl m m.. j <k> .T^)v* '•Mm. 

A»67 LFSTIGRESLANEIGE - Fi-r.!6j-. n> II of m, 

A»4J LOOE RUNNER - Um. fw»» .l«cinj«w. 

AI0^3 LUNAR LEEPERS - R*>I«M om »lrtti*rtIO (U Lu». 

AMJ2 MANNOR - P»r(tdoi M (^WOt lift-.n* (HRGI. 

A.'0.T1 MARAUDER -- lio-Jio. 14-^i.iMf pi jntKiapvdf. 

Ail 16 MICRO CHESS - '.■:'■ xxfo ' um gr.Mf Jogo dt mm.. 



APLICATIVOS/ UTILITARIOS - Cm>«9'»*>i - CZS 350.00 

AA049 3D GHAPIIICS SYSTEM - OcMitOlvi dfNnnolrm 30. 

AA0" ALPHAPLOT-C'»U'«9"4do.|l»9rilko» 
AA07J APPLE MECHANIC - Clhl<o g*r*dor d* dHMlhei, 
AAOT7 APPLE MUSIC THEORY - Curto comptt lo de mirtc*. 
AA004 APPLE PLOT - OUnno g«f.Oif 0- q.JI.toi. 
AA0M APPLE POST MoU dixta cIJMkb. 
AA023 APPLE PROJECTS - Comrolt m v i ^Ditiov 

AA0I0 APPLE STAT tiliUil.u ..jnfjdt 

AA044 APPLESUPERGRAPMICS-G«.*"d.iWMnlflianim*10» 

AA03A ARCHITECTURAL DESIGN- CAD pmMffltMVB. 
AA073 CALCSTAR - Pcdcli pl.nllhi d* alpjlot. 
AF007 09MASTER3?^ACK I - E.pimH DB MASTER. 

AFO08 DB MASTER 3 7.PACKI - E.pj-KW DB MASTER. 

AA067 DBASE VVINDO'iV - DBASE II i!(j.h««*wi 

AA037 DESKTOPPLAN - S-lWm.de em.itSo *t 'Wtflrioi. 

AA06I DISK CATALOGING - GwtiK') .!« WO dJiquew. ^ 

AF004 DOS TOOL KIT - "iMtfriOMT* DOS. 

AA045 ELETRIC DUET - P^* dMWMh* MUOL 

AA035 ELETRONIC DESIGN ■ CAD p.'. OtMnho dt eiiojilt* 

AA017 FARMPIAN - Pl.nfiimfnlo de r*;on p*. Iaiend41. 

AA043 FRAME-UP - Gr*<Wf de miwii.l pu<. o*Wit.»v 
AA018 GRAPHICSSYSTEMII-G*'»do'dedti-ihonm30. 

AAMI INVENTORY MANAGE" l'(dt.o» (C-nirolj d* ntOQvet. 

AA0?9 KNOW YOUR APPLE - Conhcft. . tu. m»q u ^j. 
A Alt', KOALA ILLUSTRATOR - Ge«*«oi de dftenhoi 

AF01G LIFESAVER - P*>. retupo.' d.iquem o»m piobltmM 

AA019 MAILLINGLIST OB - EKcXent* mUg'tll 

AA0I2 MALA OIRETA - Toulmrnlt fm pOflufuet. 

AA02I MASTERtYPE-F.nllUkoco.lodeOn.lo9r.tu. 

AA026 MERGECALC - Mwlp d H VISICALC, VISIDEX t VISIPLOT. 

AA047 f.«)OIFYABlE DATA BASE - B.i>t-» de dMoi^utlivtl. 

AA032 PFS FILE - Gt'tn<>»do< de W«coi de d*joi. 

AA041 PFS REPORTER - Ge.*0Of de '*Ui6t.oi (do PFS FILE). 

AAOK QUICKTRACE - Modrfiodo. de •rquiM*. 

AA054 THE ADDRESS BOOK Mil.fli-sucomncwioi. 

AA033 THE BASIC MAILER - Mall d-feu on o '.'AGIC WINDOW. 

AA031 THE DATA RE POUTER - Mji.pgl. i/qi. tflfi»t,tMO. 

AA034 THE DOUBLE TAKE - Suponeeo p-oj-»r»odOr. 

AA0I3 THE GRAPHIC MAGICIAN - Gwadoi • animadoi de dawntuM, 

AA060 THE INVESTOR - Siitima de connCt Oe .nveit.mtntoi. 

AA029 THE VOICE - S-muljOO. de wor. 

AA053 VIP II - ReliiOHn no VISICALC VUMda dadot. 

AA0S2 VISICALC CONSOLIDATE - One *iq««)i 0> VISICALC 

AA0I6 VISICALC EXPANDEO - V,ii«alc com aie Xtfth. 

AACX)» VISICALC FORMATTING - Format*** PJ>. o VISICALC 

AF009 V.ORDINDEX 30 (CP/MI - UMitfuo OS WORDSTAR- 

AF016 ZIP- FofnuLiWideul.i do DBASE II. 
AA046 ZOOMGRAFIX GniWiW^Jkii 

JOGOS SENIOR -- CZS 150.00 



- , - „,. ijrt.n 110;: v £"Z\ 4-Q OO 
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AJ043 MINOTAUR -Mate 

AJ098 MISSING RING - fMeti .... 

AJ077 MOPTO.VN HOTEL - Jooodea^ll 

AJM3 MORLOCS TOAER - Inei'vel .rtntu-a med*..l, 

AJ022 MS PAC-MAN ~ UmdlM^eode tl.pcama, 

AJ093 MUROERBYTME DOZEN - Super i.im u >. MUcM. 

AJOI9 NIGHT MISSION - M.11!. da tombiie em HRQ. 

AJ035 NORAO - Ado (m ounce iWdeJ*, 

AJ037 ODISSEY - Denuh-a o Marfct) rj| Um «iit».«m. 
AJ076 OLD IRONSIDES - Um. eice'eita bitallM rov«l. 
AJ094 OPERATION APOCALYPSE - Pw.aoM nvliao da II Guana, 

AJ027 PANICO - E.tnmina.iar.^jiaiuu.oM. 

AJC08 PINBALL CONSTRUCTOR - die m fl<»a..m. <ioy). 
AJ0I5 PITFALL II -AvMtu.a>i*ic*vKn.im..ia<*«at 

AJ100 RAILS WEST - Oor.it.-oi a la.ro, j no Velho OM 

AJ073 "fr.DK-VCUZ -Prtp»«4apjriant>Mtm6'bila. 

A.-:>3? RINGS OF SATURN - Eitrii*>a tlpactf. 

AJ526 ROACH HOTEL - Enl.tnia ai baraifi d«ie hoUJ. 

AJ0I6 SARGON - Xadnn de r*fv«l lonl^eole. 

A*>?& SHUFFLERBOARD-Woodebottii. 

AX«6 SINGLE'SNIGHT-E«oHeM*)ooaOeca/m. 

AXI06 SKY FOX - Mow uma inc-tSel nave (iovitici|-64X) 

A»i4l SNAKE BYTE ■ Use mi miel.ilncj pa.. u - Otwal 

AN3I SNOOKER-Um l o»o u ei>»otadei.« l Jiur. 

AJ078 SOFTPORN ADVENTURE - DrWntt f m»"icio». 

AM34 SPACE VIKINGS - Acto a per-jo no eioato. 

AJ023 SPECTRE - FufjOeSpaorapdulaDWinio. 

AX>04 SPY X SPY - 0-ipv.ia .nira 01 pafwuja-bi dj MAD- 

AJ0S0 STAR MAZE - FaiUtiica a-emora oipibal. 

AJ063 STAR SHIPCOMANOER - Guerra nudaer. 

AI103 STARCflOSS-Ave'.in'Jdeirojaoeneta.. 

AJ063 STELLAR TREK- Svpar variao de Gve'r. rui Eitr.lM 

AJI04 TEMPLE OF APSHAI II -Nortiaxniurai. 

AJ080 THE CAVES OF OLYMPUS - A«ni u r. lutmn-a .m MHO. 

AJ067 THE STANDING STONES - Aventur. loliilic**. 

AJ036 THREE MILE ISLAND - Controie una Utina Atonic, 

AJ033 THRESHOLO-EmpoiganteWtaiMnoaioaco. 

AJ034 TRACK ATTACK - Emot-smnte (630 da adto. 

AJ03S TUBE WAV - Oo«n no aipaco MftMnriDML 

•'--•>/' TUBE WAY II - Guar, tubmarlna. 

AJ033 U-BOAT - Eii'.t*j;. miliur connobnwifto. 

AJOB7 WAR IN RUSSIA - Camper** di Rl^h-i n. II Guana. 

AJ066 Y/AY OUT - SotiiHeado l.b.r.nto tiio-maniierut. 

AJ040 ifAXXON-Combitinapl.t»!ormaMtel». 

AJ074 ZORK I (UNDER E»/PIRE) - Iik>.v«I .vao lo ra. 

a. j.-l ZORK 2 (THE WIZARD) - Combat. o Maps. 

AJ075 ZORK 3 (THE MASTE R) - Terwiro d* oilofli*. 

APLICATIVOS / UTILITARIOS - Sentw - CZ$ 460,00 

AA064 AUTOCODE - OwU BI da api.cat.-jt can DBASE II. 

AF0Q6 BASIC 80 (CP/M) - Corr*illado' BASIC 

AAai3 BUSINESS GRAPHICS - Gva &*'i«t IrooanOo ■■g t .«oi 

AFOT5 DAKIM PROGRAMMER - UI.IJUr-Moxe Mm wo 3 a™ 

AA042 OATASTAR (CP/MI - G.'inc'adO' dJ bMrn £*££• 
AA0S0 DB MASTER 3 2 - No« ,«Oo do SSrT 
AF0I0 OB PLUS - Oiivf.o laformata DBF cm DBASE II. 
?!? 1 Pi'Il 1 " u " r "* > ;o da p.09'.T«j a em OBASE II 
AF0I3 FORTH - CompiUdOf FORTH. 
^V, GB *f 0R ™ - Compiajo o..adc* da Oei.rJ.oi. 

AA-MO LAST ONE - Ooa-t* otfa.J, par. o, i( - proj,,,^,! 

AF012 LISA Compiwo- ASSEMBLER. 
AA030 LIST HANDLER - Minlputltfoi de MwfMCMt 
AF005 LOCKiruP-S..i.i™par.,,ot.cJodaSM!.™». 
AA071 MAGIC WINDOW II - CHii^o proeemuot ,<, (,, l0 . 
•WM MERLIN - Ed-Wf auemb'e. (6*XW. 
AAOM QUICKC0OE 2.0 - Gerado- de prwammjo DBASE II 
AA043 REPORSTAR ICPUM - QmdM M5«riM OATASTAR, 
AA061 SENIOR ANALIST - C, W,u n«*l« "wTtwn 
MB SPREADSHEET - Plin.ina or.i.rjl »> SUPERVISICALC 
AAM7 STOCK PORTFOLIO - Vofi<. n i,,.nv7 »"rtit* IoCm 
AA0S5 SUPERCALCICP'MI-Plvt.lnadert'&.loi. ^^' 

AA0I4 TAKE 1 - Faiilit-co oetaoor da ifAnHBH, 

AACS8 THE CASHIER - P'oyama pa-a ottarKomedto rta lOiu 

AA038 THE DIC-TIO-NARY-DJtiorvJfoacom^.aaOj, ' 

AAOM THE INCREDIBLE JACK - Gen ao ampria*. 1,1. 

AA022 TIME MANAGER - faMaMM $»*** Hl»tMm 

AA06S VISICALC - C'in.;» piin.Hu a'eudnxa. 

AAOG6 VISICMEDULE - Gaitlo da aii.iiUoM. 

AA070 V ISI OE X - CHll-co banco da d »*>» 

AA0B7 VISIFILE - Sa-Vo d*»i tolegrMo torn VWMktfVWplfM, 

AA069 VISIPLOT^ViSITREND - G-alwsi a (it.n.i.,. 

AA06S VISITERM - T.animmao de dadoi. 

AA024 WRITE ON - Otuno procnudc dt mtn. 



AJ09I 
AJ10J" 
AI108 
AJ106 
AJ109 
AJII8 
AJ0I1 
AJ070 
AJ005 
AJ0I3 
AJ003 
AJ010 
AJ110 
AJI11 
AJ112 
AJ1I3 
AJII4 
AJ1IS 
AJMI 
AJ039 
AJ097 



BELOW THE ROOT - AVWOM an.mM. impwd.^l. 

DARK CRYSTAL PARTS 1 E 2 - A. ,■.■..-. am HRG. 
DARK CRYSTAL PARTS 3 E 4 - .......... am HRG. 

FI5 STRIKE EAGLE - Cumpra lull m-iaiai (64X-JOYI 
FLIGHT SIMULATOR I - S'mwladO' da too timptai. 
FLIGHT SIMULATOR II - Simulator o* too tompn.o. 
KABUL SPY - Um. laoUnla avaoiiara pol.^ol 
MICROBE - EntranooorpohurTurroa turaadoatca. 
SARGON III - Nova vettfo do lamoio SARGON. 
SEVEN CITIES OF GOLD - Avaniura am HRG (64Kb ♦ foy>. 
SUMMER GAMES - OKmpiada am alu rnolodto (MKbl. 

THE MASK OF THE SUN - Avanior. p- t „\ am HRG. 

TIME ZONE PARTS 1 E 2 - A.eniura aapad.l am HRG 
TIME ZONE PARTS 3 E 4 - A v «nt u .a ewacal tm HRG 
TIME ZONE PARTS 5 E 6 ■■ A.arttvr. aipaOal am HRG 
TIME ZONE PARTS 7 £ 8 - A,mt„.a etpacil tm HRG 
TIME ZONE PARTS 9 E 10 - Atentur. Natal am HRG. 

^.fa &VE . PAH,S " £ ^-**"-~«*"-«HHO. 
ULTIMA - A%MHn wm daatnhoi arkrnaool. 
WILARDHY - Solm.c*da avantura r» Idade MMii. 
XYPHUS - F..-.!fn.o. eieniu'a ■...-,■ , : , 



MSX 



HOT BIT / EXPERT (EM FITA) 

'.' 1 nui 1 1 am Pot luguei 

JOGOS INEDITOS - CZS 100.00 

MJOiS CANNON - OaiaooM m lona 

MJ03I CHESS IXaOVef) - Um aipatx^K Oa»'«o. 

MI024 COLUMBIA- Vi-Uo do dJll'TO 00 FLIPERAMA. 

MJ026 CORRIDA MALUCA - Labir-nio trult«o. 

r.U028 DIZZY BALL - Pegve 01 potei a Oei;<«a •> pedrai 

MJ023 GALAGA ■ Sj,nr it'*!) do GALA! ICA FLIPER. 

MJ027 GALAX - AKnlura dfponde rtpiotfo nvctaaf. 

MM» GHOST BUSTERS - BiaaaOo no loceMOdo Onama. 

MI033 HUNCK BACK - Salt* a p'.oceu da io»e. 

UHhta OLIMPIADASl -Compeotetioltrnpiiat. 

MJ0?1 OLIMPIADAS II - CompaKc*! oKmprcfll 

M7034 PAOEIRO MALUCO - Oclcr.Ji w. pjOi'... 

MM03 ROAO FIGHTER - Cowa a tut.. 

MJ029 THEZEUS - Sa-'.« a pr.<xew do laO'rlnto. 

^tKJM TURBOAT - Voce a 10a l»«h. contra o <*. 



JOGOS CONSAGRADOS - CZS 80,00 

MJ006 30 B0U8ERMAN - BatlAM o mo'.iiro. 

I.MOJO ANTARTIC ADVENTURE - E>ptCBOconi; 

MJ0I3 flE AN RAIDER - Ttt.iv»lat*jgeai;cn(a«na. 

MI047 BINARY LANO - fata 01 namoi.Ooi le an 

MJ005 COSMOS TRAVELLER ICOS»/OSI - Lula 

MJ0I9 DECATHLON -Oeul.oiOI'mplon. 

MJ0I7 DOGFIGHTER O^iiioi o» a.-:*. «iBa 

W03f DON PAN - A((3 a avtniute 

WOO) FLIGHT SIMULATOR lEOINQI - S-nvaUdor Boxig 121 

».U04i FROGGER - Ainoa trr.itr.do atra.eiur a r„. 

MJ004 HAUNT £ O HOUSE - Eif.Ha o or M» mjl aKOmTradO 

'.'.■10 HERO '.. i.-.n, .■ : ■ ■ 

MJ0IB HOT SHOE - EmoMrunia artniiy* nudaaf. 

MJOn HYPER SPORTS I ISPORTS II 'aafmeVwah cocr«aiicatt 

MJ009 HYPER SPORTS II ISPORTS III - Ma.i Ceul^, ett»M.,ot 

MJ03S JUMPING RABBIT (Ccalho Mal ui <,| - Peajt ai <«oc v ra. 

'UNO KEYSTONE KAPERS - Preoda o lactfto, 

MJOI2 IE MANS - Cor.Mii oe canoi 

MI0II MOON PATROL (LUNAR, - Pa!r u mt a igptriroa da l M . 

WKA2 NORSEMAN - Oe'anda ie t»i dri^ti 

f.U007 PITFALL II- Similar ao da ATARI. 

MJ002 POLAR STAR _ Bitalm cdlnbca em POLAR IV 3D. 

MJDOa PROJECT A IFAIXA PRETAI - Arm ','*-.,. 

hUOU PYRAMID - V.itl'oa parJeo tu P.rimJOa. 

MJ014 RIVEH RAID ■ SupereOlCbltJcoloinoiio. 

MJ044 SPOOK ANO LADDERS tSPOOKI - EKapf 1M1 1 

MJOIS SUPERCOBRA Deftroa mo bdlcoptan 

UMH TRICK BOY IFLIPPERI - Um ll«per 1 



apaiado. 



UTILITARIOS/APLICATIVOS INEDITOS - CZS 160.00 



l7HJTK90X 



JOGOS INEDITOS (vacilo onoinal) - CZS 70.00 



ZX SPECTRUM (EM FITA) 
MANUAIS EM PORTUGU£S. 



SJI45 
SJI48 
SJ07B 
SJ031 
SJt60 
SJ2I3 
SJ130 
SJI78 
SJ16S 
SJI52 
SJI37 
SJIB1 
SJ008 

SJOIS 

sjiee 
SJ018 

SJ023 
SJ0I3 
SJI70 
SJ209 
SJI33 
SJ024 
SJI59 
SI0I7 
SJ134 
SJI79 
SJI44 
SJI!i4 
SJISS 
SJI49 
SJ174 
SJI3S 
SJI57 
SJ017 
SJI72 
SJ022 
&JI6; 
SJOI4 
SJ173 
SJ021 
SJI42 
SJI47 
SJIS3 
SJ2I2 
SJIS3 
SJI48 
SJ076 
SJIS4 
SJ2I4 
SJ0I0 
SJI4Q 
5JI5B 
s»i? 

'iJi LSI 

SJI41 

SJI80 
SJIT1 

SJI3o 

SJI75 

S.'W4 

SJi*3 

sj:.j? 
SJI3I 

iiJIO 



SJ139 
SJ209 

sjoie 

SJ183 

SJ12? 
SUES 
SJO30 
SJIB8 
SJ21I 
SJ139 



un 



ARMAGEDDON - FanUlllo. (ejejfg da MISSEL COMANO 148, 

BEAKY ANO THE EGGS - Mate 01 Ud-oei 0a oves. (48, 

BEAR BOVVER - A| u da o u-ao a orrajar o cminhio |4Q| 

BLADE ALLEY - Combe!. 01 tnimiaoi da oali.^a ALFA. (4QI 

BLIND ALLEY - Inolm dttafto de motoi. 1161 

BLUE MAX - Comoaw ee/eo ru Sagunda Guaira. (481 

BRUCE LEE -Combat* 01 n^at no lamplo mald-to. (48) 

BUBBLE BUSTERS - Eiio.** todai ai bolhai (48) 

CARRI ARMATI - Dfll'iia 01 unQoei na pom*. (48) 

CENTIPEDE - Sa,. vHtnta a mate a cantope». (161 

CRITICAL MASS Incri'.N/BiMedo no lilma OUNA. (48) 

DARTZ - Emocionanw jooo de daMc* (48) 

DEATH CHASE - P.ir„ih. a llsrai'.a n U m. molo. (16) 

DISCO DAN - Daiafie o Oiico mortal. (48) 

DODGE CITY - Se|a o xarilaa tnataoi pinole Jot. (48) 

DRILLER TANKS - Daii<u.Mle>r.'vrLic(lawas. (481 

ORIVEIN Ter>lvatOr«lonoaoo2000. (481 

ENOUrlO Corr.HaOereilllenitemautOmOvel. (48) 

ERIC 81 THE FLOA ITERS - Explode 01 balSei. 
FAIRLIGHT - Uma eveniure como voci nunc* vigl 
FLAK - El.m.ne ai barn inimigai. 
FOOTBALL MANAGE R - Seji o UcrtXo de IgiabC. 

GALACTOIDES - Emoc-oAinta combata na r/tUil.. 

GALATIC RAIDERS - Fantiillco combJle npaci.1. 
GILLIGAN'S GOLO - Evlte 01 ladrflet da mina. 
GOTCHA - Tama etojptt da prldo. 

GRAND PRIX Voce nlo pode perder at:i pro.i. 

GR IORUNNE R - Alaqua 01 inyiiorai do g).d. 

GROUND ATTACK - Panelra n. co .err 1 (ni-it 1 
HAROCHEESE - Tent, apaohw 0,-ellO. 

HAUNTED HEDGES - Fenlllt.co pieman em 30. 

HUNCK BACK II - Alude Qua b mor» em 10a .inunca. 

iS-CHE SS - Ot.ma wiioda >adrri para a>pa>H 
JACK & THE BEANSTALK - Etcale o pede H-fc) 
JOUST - OeiiruiotcaMlairoivoadO'a*. 

JUNGLE FEVER - At-,i.rm >» pe-.;oi O. tloreita. 

LA RAMA - NOrtvetOodo FROGGER. 
LEAPFROG -CondWeoMpoatemicau. 

MICRODOT - Cor-M-;. lodoi 01 rnawr~«M 

MONSTER MUNCHER - Nova WfWo 

MONTY MOLE -[•pK-timlnicaanla. 

MOON ALERT - Veriao para Sr»ecir u m Oa MOON PATR0L(48) 

NEW POKER - PoV.e> (osado como nai miovnai etuari. (48) 

NIGHT SHAOE - A.anrura em 30 na c-o*de anukKoad*. (481 

ORC ATTACK - Nto rfei.a mm caatelo «ac tnvaeWo. (48) 

PAINTER - E».ta 01 rotoi da t.nta. (481 

PAKACUDA - Um coma-come complatatmnw d.lerema. (481 

PARADROIOS - Mate toooaoi pafaqucdiiiai. 

PARATROOPERS - Matraiha 01 pa'aqoee-uai. 

PHEENIX - Oattroa ot »"(.e« ptuatoa. 

PITFALL 2 - Ouira avtnlu'a da Marry Pnlali. 

PLANETOIOS - Daitr.u 01 mttaotoa. 

POKER V«hO cm poriuTuli deiie dtimo (ogo. 

RAID OVER MOSCOW- llvad. MOloOV. 

ROCCO - Seja um .■ .>■ , ..-1 1. .....;. . 

ROULETTE - Aporta n* roleia a venca w pud*. 
HUPERTBi TOYMAKEPS-Leveourio Rupert aiaal. 
SHADOW FAX - Mate todoi 01 eavalel.ot. 
SKOOL OAZE - Alain, at aulei a acmte 01 euuooi. 

SNOOKER - TratKObnal |ooo 0a l«nuca. 

SPECTRAL INVAOERS - Oattrua todoi 01 InvaapfM. 

SPEED DUEL - E*ea'ent» corrida de carroi. 

SPORTS HERO - Tome*aomhef6roirmp'oa. 

SPY HUNTER - Oeit.ua 01 vefcuioi Wnafat. 

STOPTME EXPRESS- Para o tram *apude-. 

SUPER PACMAN Enfrenta htadeHlio. 

THE BIROSSiTHEBEES-Condulaaabaina. 

THE DUEL-Tente«ebi!e«o*KO. 

THE UNOERWURLDE - Retaiie o lt*0v'o do lobaolo. 

THE 1VARL0CK OF FIRET - Um terrrvrl labl'allO. 

THE WAY OF EXPLOOING FIST - Lutai Martian. 

THRUSTA - Elim.nroipol.otcomiu( na-.e. 

TIME GATE - IncitrM combata no eipt-;o tioVal. 
TOWER OF EVIL - E»tl 0% ta-riveli monitroi. 

TRAIN GAME - Control- uma rfde Utio. Jr.i. 

TRAXX -Compl.ti todotoiovadradov 
WORLD CUP FOOTBALL - Pa'tkipa da Cepa 88. 
WORLDWAR - Combata 01 nai.ui. 
XANAOU - Um combat* Km trfgu. no eapeoo. 
ZAXXON - Baiathi da piatelorma atpawl. 
ZZOOM - 0*<*nda cm lob'evjveniti da baiaih*. 



mi 



m SEA HARRIER. 
tonkas da» arannii. 

> HarlciO pl'a ekjuJr. 

1* H.'l.:. i mcrrn de loma 



JOGOS CONSAGRADOS (vrrtio original) - CZS 50.00 

SJ095 SO ANT ATTACK - &>!•* . oarota e lujadet MtMajaji 

SJ072 30 COMBAT ZONE - Inc'lrel batalht da b'tnaedoi. 

SJOM 30 DELTA WING - BataUia .(..a lric>m.nironal. 

SJ094 30 SE IDOAB ATTACK - Combau 01 ioMiorei da cdada 

SJ047 3D STARSTRIKE - Batalha a«rea 

SJOM 3D TANK DUE L - Batalha de tancju* 

SJ0B5 747 FLIGHT SIMULATOR - P.We om (umbo 

SJ04I AD ASTRA - Fuji dot meworoi a atlre nai .n.m.»i 

SJ09I ANDROID 2 - CondWM o androidem um lab>>-iio 30- 

SJOM APPLE JAM-ComaioaaaB4l*aaeme«<Mriir. 

SJ064 AQUAPLANE - Pilole o barcoc condvra o awu-a*!.. 

SJ043 ARCADIA - C.pioiivo combaw eipi<.al 

SJ097 ASTRO BLASTER - Deutia at n..-t *r, ,.-,.;-.-:.„ 

SJ049 AUTOMANIA - A|ude o m*oln>M a montar o ore. 

SJ087 BACKGAMMON - Jojo da oamlo p,-a e.perti 

SJ076 BEACH HEAD - Cn-T.t-.1- umg in,,Uj Oe fu^lorot 

SJOM BOOGA BOO-ReLraotapodicrfrnaprofund*. 

SJ067 CAVE LON - Sa)a um rW Oico co .jif.ro Oil ouladal. 

SJ088 CHEQUERED FLAG - S»i. um corrtdor di Fc-mjti I. 

SJ034 CHUCKIE EGGS - Paoue oiovoi »emi« t-cado. 

SJ104 COOKIE - Saj. um atararado coi.nh..io. 

SJOS6 DECATHLON I P-.mt-rod.a de p-o,a. oKrreMai 

SJOS7 OECATHLON 7 - Vinca o aaaurulo 0<a da olimp'ada. 

SJ071 ESCAPE - Tenia fu3>< •■•" i-'-<...<r 

SJ07S ESKIMO EDDIE - Salve o phkjuJn no Art.co. 

SJ053 FALL GUY - Coll Saa.ariemecSo (OURO NA QUEOA) 

SJ0*9 FIGHTER PILOT - Pilot* um mooarno a.ifo 

SJOte FRED- Aiud* o Mquadlool a M da tomba. 

SJ046 FRENZY -El.r~naoiandrokmin.rr.joi. 

SJ037 FULL THROTTLE - E>c*l*nti 

SJ009 GULPMAN-Comaaimaolier 

SJOBO HARRIER ATTACK - rMota u 

SJ034 HIGH NOON -Ow»k> no veino 

SJ102 HORACE 81 SPIDERS -SUA 1 

SJI03 HORACE GOES SKIING - L*v 

SJIOI HUNGRY HORACE - Nlo dei. 

SJ03S INVASION FORCE - Oeifua a m.e Intarpl 

SJ066 JETPAC-Monwofoaveieefwadopiantfa. 

SJ089 JETSETWILLY-AcheotobietoiparapoderdoiTw. 

SJ033 JUMP CHALLENGE - Uma prov.de aalto am motodc 

SJ096 JUWINGJACK- Le.e Jack Saltador ao topo da tela. 

SJ077 K0K0TONI WILF - Condura oanio peli pre-h-iter,. 

SJO68 KONG - Salv«amoc.nMadaitrv.oKONG. 

SJ0B2 KOSMIC KANGA - Alud* o OiAjurU itpawl 

SJ079 LAZY JONES - VaVioiioaoi em um V, prowa™. 

SJ092 MANIC MINER - Ajude o m.i^.roWJIv, 

SJO86 MASTE R CHESS - Xod-er de alio rarvai 

SJ062 MATCH POINT - GmheolormiodaW.mb'tdon 

SJ044 MAZIACS - Ptneireemumiabir-niomortH. 

SJ070 METEOR STORM - Pulvar i(* Ot att*ro<(Ml a ai navH. 

SJ093 MR WIMPY - A|ud* o corWiiiro a (a«r tandufdvn- 

SJ042 NIGHT GUNNER - P.loie um bombardairo. 

SJ02S NIM-8LE -S*l.olmo*ditativ«abomba. 

SJ03B PENETRATOR-Penatiacommanivenacavernt. 

SJ099 PINBALL-F>ca4entetogo0eflip*fim*. 

SJ04S PIROMANIA - Sua um bombeiroe iptauj 01 khtMb 

SJ09B POOL Farnltixoioudaiimrca. 

SJ073 POTTYPAINTER-PintaotQuadradateiobraviva. 

SJO90 PSSST-Proiejaallordaipraoaidoiardim. 

SJ05I PSYTRON - Pe.,jr. n. atlacJo orbital. 

SJ08I RIVER RAID - Sobrivoe o ilo e dutroa 01 «im«ot. 

SJ031 SABRE WULF - Use o ubre para a* defender da mc-W 

SJ036 SCUBA DIVE -Merouilv. no mar prolunr», 

SJI05 SIMULADOROE VO0- Ve'iIoPottvoutti. 

SJ074 SIR LANCELOT- Aiude-o a eo'rentar ot periooi 

SJ048 SON OF BLAGGER - Air.^ta* todoi 01 perioot. 

SJIOO SPACE RAIDERS -Aolomorlil no npaco. 

SJ078 SPECIAL DELIVERY - Enweoje ot prnenret- 

SJ063 ST rip POKER- Ditpatearou. 

SJOM STYX-Enlreniaataranh*taabrw«a. 

SJ040 TERROR-DAKTIL40-En(r*nlaolpu/oo*cWot. 

SJ055 THE PYRAMID- Detvandaoeaoradodap-imrfle. 

SJ027 TIME BOMB - Sr,a rip-to a cu-Iarlo coma tomba. 

SJI08 TORNADO LOW LEVEL - Um cUtfro para Spectrum 

SJ0€0 TRASHMAN - Ajud* o li.e-o* peoai o li«o. 

SJ069 TUTANKHAMUN - Enire m tumba da TutanLamun. 

SJOS2 WHEELIE - P.lota um* mow inoemeniada. 

SJ083 WORSE ATSEA-r*»od*i-*ona*ioalurKl*r. 



UTILITARIOS / APLICATIVOS INt-DITOS - CZS 100,00 

SF002 DISASSEMBLER - ReUde no lopo da RAM. (481 

SF003 DISASSEMBLER II - Reikle na area BASIC. (48) 

SF001 FULL COMPILER- Super oampiiador BASIC (48) 

SF004 ASSEMBLER SPECTRUM Projr.rn, em mnemon^oiZ 60 (43( 



UTILITARIOS/APLICATIVOS CONSAGRADOS - CZS 70.00 

SF0M MCODER 2 - Compilador BASICda bo* pertormenca. (43) 

SA004 VU-30 - M.n. CAD para detamolvar projitoi. (48) 

SA003 VU-CALC-Amelrkorpia-iinidecallculc* (48) 

SA002 VU-FILE - Banco da Oadot mvliHunoiorul. (48) 



JOGOS SPECIAL SVSTEMS 

(programii s mxHiiti am portuguii) - CZS 70,00 

SJ002 ASTEROIOCS- Cl*Mi»amoc.onanieemno.»»e« 
SJOOl PEROLAS - Acfo tubmxin. com torn a novai HI* 
SX03 VOOSIMULADO Em nova WeR apt'lt-coKfa. 



APLICATIVOS SPECIAL SVSTEMS 
(totermenM «m lingo* portugulu) - CZS 100.00 

SAOOl BANCO 0E DAOOS - V.rHo etpacW 



SINCLAIR COMPATlVEIS 

• SOFTWARE 

• REOEFINIDOR DE CARACTERES 

• SUPRIMENTOS 
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COMO COMPRAR PROGRAMAS: Faca seu pedido por carta, relacionando o codigo dos produtos, quantidades, valor unitiirio 8 total por produto. 
Ao terminar feche um total geral. Nossos prec-os para PROGRAMAS ja incluem as despesas postais. NSo se esquepa de identificar-se e ao local para re- 
messa. Anexe cheque nominal a STOP ICARAI DISCOS E FITAS LTDA. e remeta para o endereco abaixo. Seu pedido sera prontamente atendido 
logo ap6s a liberacao pela rede bancaria do valor correspondente. 
Gravacoes garantidas por 30 dias a partir da data de atendimento do pedido quanto a defeitos de fabricacao. 

#7™ ■■^■a^aa. •■% Pedtdos para as linhas APPLE e SINCLAIR, somenie serao atendidos quando colocados por correio. Em nossa loja alendemos somente as linhas 

*aa>^ I \ IPaaT ZX SPECTRUM e MSX. neste caso com 20% de desconto sobre o preco lisiado. 

■•» I eaapl © As olenas aqui conndas somenie sao validas para pedidos colocados por correio. incluindose nesta limitacao as linhas 2X SPECTRUM e MSX. 

INFORMA TICI CORRESPOND£NCIA: PRAIA DE ICARAf, 211 / Lj. 03 - NITEROI - RJ - CEP 24.230 - TEL.: (021) 717-1700 



MSX 




OHotbit 
com gravador 
e joystick. 



Os limites da compatibilidade 



O langamento do padrao 

MSX representee , sem 

sombra de duvidas, uma 

revolucao na Informatica, e 

o seu sucesso e inegavel, 

principalmente na Europa e 

Japao. No Brasil, 

entretanto, desde o ini'cjo 

levantou-se a questao 

quanto a peculiaridade de 

nossa lingua, o que exigiria 

modificacoes na maquina, 

mais precisamente no 

teclado e na tabela de 

caracteres. Com a entrada 

do padrao no Pais, cada 

fabricante tentou resolver o 

problema a seu modo, 

criando diferencas entre os 

equipamentos nacionais. 

Neste artigo, Henrique 

Figueredo Luz expoe sua 

opiniao a respeito da (in) 

compatibilidade dos MSX 

nacionais. Em breve, MS 

trara uma analise de sua 

equipe sobre o assunto. 



Henrique de Figueredo Luz 



Expert, 

da 

Gradient e. 




Quando a iluminacao a gas co- 
mecou a ser substitui'da pela 
eletrica, cada fabricante tinha 
um padrao diferente de rosea 
para suas lampadas. Isso fazia com que 
uma rcsidencia com um determinado 
tipo de instalacao so pudesse ser equipa- 
da com lampadas de uma unica marca. 

O mundo da informatica sofreu a 
mesma "doenca juvenil". Cada fabrican- 
te se sentiu no direito de conceber sua 



Figiira 1 
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propria versao de uma dada linguagem 
ou sistema operacional. 

padrao MSX, ja adotado por mais 
de duas diizias de fabricantes no mundo 
inteiro, veio para acabar com a "Babel" 
que se instaurou no mundo da computa- 
cao. 

Desta forma, um software desenvolvi- 
do para uma certa marca, deve servir, 
com certeza, em outras linhas, desde 
que obedecendo aos padroes MSX. Os 
micros dessa linha obedecem a seguin- 
te configuracao minima: ROM de 32 
Kb, contendo o interpretador BASIC e 
o BIOS (BASIC Input Output System), 
RAM de 8 Kb (as versoes brasileiras 
possuem 64 Kb); um sistema de dois 
slots (as versoes brasileiras possuem 
quatro). sistema de caracteres deve 
seguir ao padrao ASCII. 

Mesmo seguindo a um padrao, exis- 





Slot Slot 1 Slot 2 Slot 3 
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Figura 2 
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Cartucho Expansoes 



Figura 3 



tern, porem, diferen9as de fabricante para fabricante. Entre- 
tanto, elas nao chegam a prejudicar significativamente a com- 
patibilidade. Nos representantes nacionais do padrao MSX — o 
Hotbit e o Expert - as principals diferencas sao seis: teclado; 
mensagem do fabricante; mensagens de erro; disposicao dos 
slots; conjunto de caracteres; e comandos para impressora. 

TECLADO 

A Gradiente, que parece querer atingir um segmento mais 
profissional do mercado, elaborou um numerico reduzi- 
do de extrema funcionalidade, sem prejudicar o posicionamen- 
to das teclas de controle do cursor. A acentuacao e feita por 
uma unica tecla, mas pode-se tambem ter acesso as vogais 
acentuadas pelas teclas RGRA e LGRA. 

Ja a Sharp, mais voltada ao mercado domestico, preferiu 
nao colocar um numerico reduzido, optou por preencher o 
mesmo espaco com gigantescas teclas para o controle do cur- 
sor. No Hotbit, a acentuacao e feita atraves de tres teclas, duas 
com dois diferentes tipos de acento e uma com o trema e um 
carater normal (apostrofo). 

















Figura 4 
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Quando o teclado esta sendo usado normalmente, ou seja, 
nenhuma das teclas graficas esta sendo pressionada, a disposi- 
93o de nove teclas 6 completamente diferente. Para quern esta 
acostumado a programar em um Expert e depara-se com um 
Hotbit na frente, ou vice -versa, e bastante incomodo ter que 
procurar a tecla das aspas, a do dois pontos ou a do ponto-e- 
vi'rgula, que sao amplamente usadas em um programa BASIC. 

Existem grandes diferencas nos dois micros em relacao ao 
acesso dos caracteres graficos. Nas versoes europeias do MSX, 
seis tipos de teclado podem ser ativados:minusculas;maiuscu- 
las; minusculas acentuadas e o alfabeto grego minusculo; 
caracteres maiiisculos do alfabeto grego; caracteres graficos I; e 
caracteres graficos II. 

Para acessar tais teclados, existem duas teclas graficas que 
sozinhas ou combinadas com a tecla SHIFT realizam o acesso 
aos teclados alternatives. Nos dois micros, essas teclas recebem 
os seguintes nomes: GRAPH e CODE (Hotbit); e L GRA e 
R GRA (Expert). Deste modo, o usuario tern duas maneiras de 
acessar os caracteres acentuados, pelas teclas de acento ou ati- 
vando o respectivo teclado. 

Expert respeita essas conven?oes de teclado da vers3o 
europeia. Ja o Hotbit nao possui o teclado de minusculas 
acentuadas, acessando esses caracteres apenas pelas teclas de 
acento. As letras gregas minusculas foram agrupadas as maiiis- 
culas, ja que estas n5o ocupavam a totalidade do teclado. 

MICRO SISTEMAS, junho/86 
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MENSAGENS 

Mensagem do fabricante — talvez seja o menos significa- 
tiva das diferencas entre o Hotbit e o Expert. Ela se encon- 
tra a partir do endereco &H7ED8, ocupando 74 bytes, e e 
apresentada sempre na screen (cada um desses bytes 
contem o carater ASCII com os dizeres da Gradiente ou da 
Sharp). O Hotbit e o Expert apresentam as mensagens mos- 
tradas na figura 1 . 

fato de o Hotbit apresentar "versao 1.1" e o Expert 
"versao 1 .0" pode levar um leigo a pensar que o BASIC do 
Hotbit e uma versao mais aprimorada que a do Expert, mas 
isso nao e verdade: quanto aos recursos do BASIC, os dois 
micros sao identicos. 

Mensagem de erro — o Expert apresenta mensagens de erro 
em ingles, como todos os micros fabricados no exterior. Embo- 
ra nao haja palavras difi'ceis nas mensagens, um usuario que 
nao possua um conhecimento mediano em ingles pode sentir 
certa dificuldade em compreendc-las. Ja o Hotbit apresenta 
mensagens de erro traduzidas, porem, em alguns casos, deixan- 
do a desejar. 

DISPOSICAO DOS SLOTS 

Expert e o Hotbit possuem quatro slots, sendo que cada 
um pode enderecar ate 64 Kb de memoria. Vejamos porque, 
em term os de hardware, esta e a maior diferen§a entre os dois 
micros. slot e o slot 2 do Expert sao internos. No slot 
0, nas duas primeiras paginas de memoria, estao os 32 Kb que 
compreendem o BIOS e o Interpretador BASIC. O slot 2 esta" 
totalmente preenchido com um banco de 64 Kb de memoria 
RAM, mas so as duas paginas superiores (paginas 2 e 3) sao 
reservadas ao BASIC. 

conector do slot 1, marcado CARTRIDGE A, possui 
prioridade sobre o slot 3, que e chamado de CARTRIDGE B 
em sua conexao frontal e BUS EXPANSION os slots do Expert. 

2 apresenta a disposicao da memoria entre os slots do Expert. 

Hotbit possui a ROM, com o sistema operacional (BIOS 
e Interpretador), conectada no mesmo slot que o Expert 
(slot 0). A grande diferenca esta nos 64 Kb de RAM, que no 
Hotbit estao no slot 3. conector para cartuchos e a entrada 
do slot 1, e o conector lateral e a entrada do slot 2. A figura 

3 mostra a estrutura de distribuicao de memoria no Hotbit. 

Um programa em BASIC nao "sente" a diferen?a de estar 
rodando neste ou naquele slot, mas o maior problema esta" 
em programas em linguagem de maquina que utilizem as duas 
paginas inferiores de RAM, ativem um cartucho ou realizem 
qualquer operacao com a PPL O programa deve ser bastante £ 
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inteligente a ponto de saber em qual slot estd a execucao, 
quais os slots que possuem RAM, e ter autonomia suficiente 
sobfe a manipulacao correta dos slots para operar sem proble- 
mas. 

TABLE DE CARACTERES 

padrio ASCII estabelece o formato e a funcao dos 127 
primeiros caracteres. As figuras 4 e 5 apresentam o conjunto 
de caracteres do Expert e do Hotbit, respectivamente. 

O Hotbit respeita totalmente o padrao ASCII, mas o Expert 
nao. carater 126 deveria ser o til """, mas a Gradiente colo- 
cou o "C" no lugar; o carater 96, que deveria representar o 
apostrofo contem o "9". 

grande problema e a diferenca mais visi'vel entre os dois 
micros sao os caracteres acentuados. Em alguns caracteres, 
apenas a forma das letras e diferente, mas em outros na"o hi 
nenhuma relacao. Expert possui o ipsilon com til, carater 
que o Hotbit n3o possui. Em compensacao, ele tern o ipsilon 
tremado, que nao existe no Expert. Ainda bem que essas letras 
nao sao usadas pela lingua portuguesa (alias, gostaria que 
algum leitor me escrevesse, contando se existe alguma lingua 
que use essas coisas estranhas: ipsilon com til 6 coisa de 
americano fanhol). 

A figura 6 apresenta os codigos de alguns caracteres que nos 
dois computadores representam letras completamente diferen- 
tes. Esta havendo uma tentativa de compatibilizacao do con- 
junto de caracteres do Expert e do Hotbit, duplicando caracte- 
res uteis, que nos dois micros representam letras diferentes, 
e eliminando os caracteres alienigenas, que provavelmente nun- 
ca serao usados por usuarios comuns. Como ainda nao ocorreu 
esse acordo, um software que possua tais caracteres apresenta- 
ra o grave problema de representar uma letra diferente em cada 
micro. 



Uma das maneiras de se contornar isso 6 a alteraca"o de linha 
por linha do programa, o que, dependendo do tamanho do 
programa, podera" ser um trabalho extremamente exaustivo. 
Uma outra maneira possi'vel 6 a varredura byte a byte do pro- 
grama BASIC e a troca de cada carater que apresenta sua for- 
ma diferente. programa da listagem 1 faz exatamente isso; 
ele deve ser inserido ap6s um programa BASIC, pela digitacifo di- 
reta ou pela aglutinacao proporcionada com o comando MERGE, 
o que e muito mais pratico. Mas para que o MERGE possa re- 
conhecer o programa na fita, ele deve ser gravado com o co- 
mando SAVE, que no cassete grava as linhas do programa no 
formato ASCII. 

COMANDOS PARA IMPRESSORA 

As impressoras brasileiras, que respeitam o padrao Abi- 
comp, possuem todos os caracteres acentuados da lingua por- 
tuguesa, os quais tambem estao residentes nos MSX brasilei- 
ros. c6digo desses caracteres, porem, 6 diferente nas impres- 
soras e nos micros. Se um dos caracteres acentuados for envia- 
do para a impressora, podem acontecer coisas estranhas como 
o salto de pagina e o ativamento dos caracteres condensados 
ou expandidos. 

Isso acontece porque os caracteres de a 31 e os de 128 
a 1 59 sSo caracteres de controle da impressora, e no MSX eles 
representam letras acentuadas. Quando um desses caracteres 
6 enviado para a impressora, ela interpreta-o como um cardter 
de controle e nao como uma letra (6 assim que essas coisas 
estranhas acontecem). 

Hotbit possui internamente uma tabela que transforma 
os caracteres acentuados para o padrao Abicomp, e esta 
tabela ja" esta ativa quando o micro 6 ligado. O Expert, entre- 
tanto, apresenta este tipo de problema, existindo, contudo, 
uma maneira de contornd-lo. A listagem 2 contem um progra- m 
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Figura 6 



Listagem 1 



(S5000 •KKwmci'K-MiiKKitiiiiKiiKxiimndimiim 

65010 '* ADAPT ADOR lllll XIM'.KT * 

A3O20 '* HCNKIOIIE LU2 ABRII./HA K 

.'.'.■«: 10 '«"»«..*.•'.»*)......>...»*>.<..* 

65040 CLS = COLOR 15.4. 'S 

65030 PR TNT" ADAITADGR 



65060 PRIHT'TXPCPT )|IOI (III I" 

65070 PRINT! HMWr-IIOl ltd VEXPER1 



65000 PKJ HI" 



650V0 E*=IMPUI1< I ) 

65100 DItt A(6, 1 > 

65110 FOR M»i fO f.: WAD M,l 

65i»o trrs ""i"Tiir.N5UrtP ii.e 

65130 A<N,0)-Hc A<M,1>=E= NOCT N 

AM 4© l-OR R-387-.7 TO 65535! 

65150 K»PEEK<R> 

65160 II" K Q AND PEEK(R+1>*0 AND PEFK'R 

t2)=0 THEN PRINT"l'ROGRAMA HIAMSt OltMADO" 

•: END 

65170 II l>0 THEN R»R+4< F"ft« OOTO 6521 

II SE G0T065180 

65100 IF K=143 THEN F"-l 

AM'>0 IF K»34 THEM F=NOT F 

65200 IF F— I THEM BOTO&S220 

65.-? 10 MEXT R: END 

65P30 FORH^O TO 5 

65230 IF PFF.K(R>'-A(H>0) IIH.N POKE K,ACf. 

,1): PRIHIlt;" "»PEEK(R)l D0TO65210 

65240 NEXT h: OOTO 65210 

65250 DATA 135,96,128,126, 126, 128,103,1 

2V, 96, 131, 132,65 



Listagem 2 



100 r Nttl»IINIH>ltffNailllltettlHtltlHHHHHIIHUlN 

lie '« ADAPTnDOR II-MSX/MOHICft « 

« 190A MILTON HALOONUDO JR. « 

120 '•»"•■ ..•***«.. ..K./*"*.X,I*K«« 

13B DATA FE.60 CP 6811 
140 DATA 2B.13 JR Z.C2ESII 
150 DATA FE.7E CP 7EH 
160 DATA OB RET C 
170 DATA FC.P/ CP I17FI 
100 DATA 00 RET NC 
190 DATA E5 PUSH HI. 
280 DATA 05 PUSH OE 
218 DATA 21,FC.C2 ID HL.C2ECH 
228 DATA 16.88 10 D.00H 
238 DATA 5F LD E.A 
240 DATA IV ADD IIL.DE 
258 DATA 7F 10 A.(HL) 
260 DATA Dl POP OF 
270 DATA El POP IIL 
206 DATA C? RET 
298 DATA 3E.7D LD A.7DH 
M08 DATA C? RET 
318 ' 

328 DATA A6.00, 7E,20,CO,C3 r C4,Ci .C5.60, 
C9, CA ,20, 26. CD. CD, A4,A2,AB,D5, 05,02,03. 
00, DO, DA, 20, D3. 09,28, 20, 26, 26, 20, C2.CC, 
Dl , D7 , Cr , AT , DC . OD . DE , 20 . 20 , 20 . 20 , 20 . 20 . 
20, A4.C4, 20, 20, 03,03, 26, 20 
330 ' 

340 CLSSPRIHT"DRAPPLCR MSX/MNICA PLUS" 
350 PRINT:PRINT:PRINT "Aguarde uw insta 
rite..." 

360 FOR I=>0 TO 03:REAO A1>:PRTMT LEFTt(A 
»,2>:" ": 

370 IF LEN(At>>2 THEM PRINT TABCi5):MID 
SCAS,3) 

3B0 POKE 50000!tI,UAL("«l{"iAI>:HEXT I 
396 POKE «HFFB6., 195 = P0KE RHFF07 ,(IO:POKE 
«HFFBB,195:LPRINT CHR*(27) ;"R";CHR%(1 > 
400 END 



ma que, atraves de uma rotina Assembler, faz as devidas trocas 
dos caracteres enviados pelos equivalentes da impressora. 

fi importante que a sua impressora possua o gerador de ca- 
racteres Brasil/Portugal, pois ele 6 ativado por este programa, 
que foi testado em uma Monica Plus e funcionou perfeitamen- 
te. 
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SOFT 



as ultimas novidades do mercado europeu 



LTOl - Bounty Bob - Bob nss Minos 
LT02 - Moon Atari - Alerts Lunar 
LT03 - Popoya ■ Marinheiro. e claro 
LT04 - Hunter Klrtar ■ Pilole um Submarino 



LT05 - Skoll Due Conlusao na Escola 
LT08 - Pud Pud ■ Teme Sobreviver 
IT07 - Booty ApSo Pirala 
LT08 - Profanation ProfanacSo 
LTOl - Baseball Ultima Versao 



IT20 - Spy Hunter Cacador de EspiSes 
LT21 - Pyjamarama ■ Escape deste Sonho 
LT22 - Glaea - Aventuras em 3." Dimensao 
LT23 - Death Cheaa 5000 Lances Mortais 
LT24 . Vldaollmpice Torneio Ollmpico 



LT10 - Project Future - Perigo Nuclear 



LT26 - Pogo Joe Acerte o Jato 
LT2B - Karate Kid Incrivel Luta 
LT27 - City Hall Missao Espacial 
LT28 • Nigtitshadow ■ Deslrua os inimigos 
LT2I - Watt Bank - AcSo no Vdho Oeste 
LT30 - Baikal Ultima Versao 
LT31 - Robin Wood resgale 
LT1 1 - Squaih Desalio LT32 - Time Gate PortSo do Tempo 
LT12 - Rocky Boxeador LT33 - Comando - Exercldos de Guerra 
LT34 • Be Bill • Aventura nas Cevernas 
LT35 - Tapper • Incrivel Choppeiro 
LT36 - Herbert's Travessuras do bebe Wally 
LT13 - Moon Creeta - Desafio Lunar 
LT14 - Boulderdaeh Fuga em Marte 
LT15 - Dambuetare - Missao em plena guerra 
LT16 - Allan 8 Um Robo condu* uma Nave Espacial 



LT1 7 - Everyone's Vally • varios personagens em opSo 
LT18 - Dukes of Hazzard ■ Corrida nas Estradas 
LT19 • Mission impossible - agente secreto 

Custo Unitarlo - Czi 80,00 





VENDAS. CEDUSOFT informAtica, educacAo B SlSTEMAS ltda, 
Rue Setr- de Setombio. 9? SalellM' Tol.: 021-222 M9I i CEP 20050 / Rio de Janeiro 




ALTA QUA1.IDADE DE GRAVAQAO 
E PRONTO ATENDIMENTO 



pot carta dev»sm ier feiioa atravfo de cheaue nominal 
4 CEDUSOFT INFORMATICA. EDUCACAO 6 SlSTEMAS 



253-1120 



Com a Centraldata 
a entrega e imediata 



253-1120 



NAO PONHA EM RISCO O SEU COMPUTADOR, ADQUIRINDO 
PRODUTOS DE QUALIDADE COIMSAGRADA. 



MiDIA MAGNETICA 

• Disketes e fitas magn6ticas, marca DATALIFE 
VERBATIM, com 5 (cinco) anos de garantia 

• Discos magneticos, marca IMPELCO, com 
1 (um) ano de garantia 

• Disketes de 5 1/4" para limpeza do cabecote de 
leitura e/ou gravacao 



FITAS p/ impressoras em geral, marca 

CARBOFITAS, com garantia total contra defeitos 

de fabricaca'o 

Etiquetas PIMACO - PIMATAB 

Formularios continuos e pastas 

Arquivos p /disketes com capacidade para 

10 ( dez) ou 100 (cem) disketes 

CONDICOES ESPECIAIS 
PARA REVENDEDORES 



Suprimento e coisa seria 
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Com, a Represenlacoes Llda. 



Distribuidor Autorizado: 
CARBOFITAS • PIMACO • VERBATIM 
Av. Presidente Vargas, 482 - Gr. 201/203 
Tel. : KS (021 ) 253-1120 - Telex (021 ) 34318 



Cadastramento de provas, arquivos ou pesquisas de opiniao, em micros 
da linha TRS-80, sao algumas das aplicacoes para este programa. 



Avaria/BAS 



.Fabio Zicker e Alberto Centero Filho. 



O programa Avaria/BAS foi desenvolvido no Departamento de 
Medicina Preventiva da UFG e Nucleo de Desenvolvimento 
de Saude-GO, e vem sendo utilizado em pesquisas na area 
de saiide publica. 
Elaborado em BASIC-disco num vocabulario nao especifi- 
co, o programa e adequado para os microcomputadores da linha 
TRS-80, possibilitando ao usuario a definicao de seu proprio arquivo 
de dados. Por ter um menu principal de operacao e uma execucao de 
forma interativa com o usuario, sua utilizacao torna-se bastante simples. 
Avaria/BAS tern como objetivo a analise de respostas a um deter- 
minado conjunto de ilens no programa denominado campo, atraves de 
alternativas alfanumericas. 

Alem de permitir a busca de um determinado registro e alteracao 
atraves de seu numero, o programa faz a analise qualitativa das respos- 
tas, permitindo pesquisas por alternativas ou associacao delas e sua 
quantificacao. 

menu apresenta as seguintes opcdes: 

1 - Leitura de arquivo; 

2 - Abrir novo arquivo; 

3 - Pesquisa pelo numero de registro; 

4 - Pesquisa por variaveis; 

5 - Tabela de freqiiencia de variaveis; 

6 — Entrada de novos registros; 

7 — Alteracao de registro; 

8 - Delecao do arquivo on-line; e 

9 - Consulta ao diretorio. 

O princi'pio geral do programa consiste na definicao previa de um 
arquivo atraves da opcao 2, onde serao especificados alem do nome, o 
numero de campos a serem respondidos (poderiam ser perguntas de um 
questionario) e o numero de alternativas para os campos (possi'veis res- 
postas as perguntas). 

Por exemplo, poden'amos definir um arquivo de 30 campos ou 
questocs a serem solicitadas e que cada um destes campos teria cinco 
possi'veis alternativas de respostas (A,B,C,D,E). A seguir, o programa 
solicita a entrada dos registros com as respectivas alternativas para cada 
campo. Desta forma, por exemplo, o registro (ficha) numero 1 poderia 
ter os seguintes dados: 

Ficha numero 1: Campo 1 = A; Campo 2 = A; Campo 3 = B; 
Campo 4 = E... e assim por diante ate o Campo 30. Cada um dos 
campos teria uma determinada resposta, neste caso, variando de A a E, 
como definimos anteriormente. 

Pode-se verificar que o questionario a ser analisado devera ser de 
respostas fechadas e indexadas, ou seja, oferecer alternativas de respos- 
tas ja defmidas, onde o preenchimento do mesmo seria realizado apenas 
assinalando uma destas alternativas. 

Os registros vao sendo gravados automaticamente no disquete e 
ao terminar a entrada dos dados pode-se voltar ao menu principal 
teclando arroba (@) no campo 1 do proximo registro. 

Caso ja existam dados gravados, a operacao deve se iniciar pela 
opcao 1 , com a leitura de um determinado arquivo; c a seguir, a selecao 
de uma opcao qualquer do menu, a nao ser que se queira inicializar um 
novo arquivo. 

Apos a leitura de um arquivo, o programa informara o numero 



de campos, alternativas, registros gravados e de graos ocupados pelo 
arquivo. A inclusao de novos registros a um determinado arquivo e 
fcita da mesma forma descrita, atraves da opcao 6, semprc apos passar 
pela opcao 1. 

Na parte anali'tica das respostas, poderemos trabalhar com as 
seguintes opcSes: 

OPCAO 3 - PESQUISA PELO NUMERO DO REGISTRO 

Esta opcao permite buscar uma determinada ficha atraves de seu 
numero e conhecer todas as respostas de cada campo. Com o comando 
<CTRL E> retoma-se ao menu e com < CTRL N>, pesquisa-se nova 
ficha. ObservacSo: no CP 500, a tecla CTRL e substituiVJa por SHIFT 
seta para baixo. 

OPCAO 4 - PESQUISA POR VARIAVEIS 

Neste caso, o programa perguntara qual e o campo ou condicao a 
ser pesquisada e qual a alternativa de resposta que lhe interessa. A 
seguir, sera listado no vi'deo o numero das fichas que satisfizerem a con- 
di;ao solicitada. Exemplificando, se tivessemos interesse por todas as 
fichas assinaladas com a alternativa 3 para a questao numero 20, os 
numcros das fichas que satisfizessem esta condicao seriam mostrados. 

Da mesma forma, poden'amos pedir as fichas que atendessem 
mais de uma condicao ou associacao de variaveis. Exemplificando, po- 
den'amos pedir todas as fichas que alem de ter o Campo 20 = 3 tambem 
tivessem o Campo 25 = 2. 

Para isso, ao inicializar a opcao, o computador lhe perguntara 
quantas condicoes deseja verificar. Com o comando < CTRL D >, 
teremos a informacao sobre qual foi a condicao solicitada. 

OPCAO 5 - TABELA DE FREQUENCIA POR VARIAVEIS 

Nesta opcao, trabalhando da mesma forma que no item anterior, 
o programa construira uma tabela de freqiiencia dando a quantidade de 
fichas que atenderam a condicao solicitada e quanto representa isto em 
termos percentuais. 

OPCAO 7 - ALTERACAO DE REGISTRO 

Em qualquer momento e possi'vel a correcao de uma determina- 
da ficha, bastando para isso usar a opcao 7 , que lhe solicitara' as infor- 
macoes necessarias. 

OPCAO 8 - DELECAO DE ARQUIVO ON-LINE 

Utilizada quando se deseja reiniciar a entrada de dados de um 
arquivo e deletar o arquivo em memoria. 

Finalmente a opcao 9, permite uma consulta ao diretorio do dis- 
co com retorno automatico ao menu, sem zerar as variaveis do progra- 
ma. 

Este programa trabalha de forma bem rap id a e utiliza pouco tem- 
po de memoria on-line. Na gravacao em disquete, e possi'vel o armazena- 
mento de aproximadamente 1250 respostas por grao ou aproximada- 



mente 125.000 respostas por disquete. Como exemplo, em um disquete 
poderiamos armazenar cerca de 5000 fichas de um questionario que te- 
nha 25 perguntas. 

Sao abertor dois arquivos: um contem a definicao geral do arqui- 
vo de dados e o outro armazena as variaveis. E interessante notar que 
o primeiro arquivo tambe'm e' responsavel pela chamada do segundo ar- 
quivo (o que tern a extensao "V" para indicar as variaveis que guarda). 

As a'rcas de utilizacao do Avaria/BAS sao bastante variadas. Ele 
pode ser usado em aplicacoes comerciais, atividades de ensino como 
correcao de provas, arquivos diversos e principalmente em inqueritos ou 
pesquisas de opiniao. 



Fabio Zicker 6 Mddico e Professor da Universidade Federal de Goiis, e 
trabalha ainda com CP 500 e DGT 100 em atividades de ensino e pes- 
quisa. 

Alberto Centero Filho 6 Estagiirio em ProgramafSo, na UFG, traba- 
lhando com DGT 100 e CP 300. 



Avaria/BAS 



CLASSIFICADOR DE VARIAVEIS" 



10 CLEAR 5000 

15 DIM CS(IO0),CC(100):W«=STRING*(63. 131 > : WW*=STRING* (63, 176) 

20 CLS 

21 PRINT" 
23 G0SUB 140 
25 PRINT8153,"MENU"; 

30 PRINT9271,"1 - LEITURA DE AROUIVO"; 

40 PRINT93.35, "2 - ABRIR NOVO AROUIVO"; 

50 PRINT9399, "3 - PESQUISA PELO NUMERO DO REGISTRO"; 

60 PRINT9463, "4 - PESQUISA POR VARIAVEIS": 

70 PRINT9527,"5 - TABELA DE FREQUENCIA DE VARIAVEIS"; 

80 PRINT959l,"6 - ENTRADA DE NOVOS REGISTROS"; 

90 PRINT9655, "7 - ALTERACAQ DE REGISTROS"; 

95 PRINT8719,"8 - DELECAO DO ARQUIVO ON LINE"; 
97 PRINTS783,"9 - CONSULTA AO DIRETORIO" 

100 PRINT9847464, "DE A SUA OPCAO ";: INPUT OP 

110 IF 0P>9 OR 0P<1 THEN 0P-0:GOTO 20 

130 ON OP GOTO 200,500,800,1100,1400,1700,2000,2300,2400 

140 PRINT964.W*; : PRINTS960, WW*; 

195 RETURN 

20O REM LEITURA 

203 IF NA*<>"" THEN GOTO 2550 

205 NA*a"" 

210 CLS: INPUT" NOME DO AROUIVO" ; NA* 

215 IF NA«-"" THEN GOTO 20 

217 IF LEN(NA*>>8 THEN CLS:PR1NT"0 NOME DO ARQUIVO ESTA INCORRET 

O < NO MAXIMO 8 CARACTERES >":FOR 1-0 TO 150O:NEXT I : GOTO 205 

220 AN*""/V":AN*=NA**AN* 

230 OPEN'Tl", l.AN* 

250 FIELD 1,4 AS NC*.4 AS NS*,4 AS FD*, 4 AS QQ* 

260 GET 1,1 

270 NC-CVS(NC*> :NS-"CVS(NS») 

275 FD-CV5<FD*> :QQ=CVS(QQ») 

277 IF FD*0 AND NC=0 THEN GOTO 2600 

230 DIM AAS(NC) 

290 CLOSE 1 

300 0PEM"R" , l.NA* 

310 LF-LOFU) 

320 QR=(FD/NC)«(LF-l)-tQQ 

325 GR=((L0F(l)-l)/5)-H 

330 CLS:PRINT923. "INFORMACAO SOBRE ARQUIVO" 

350 print:print:print"nome do arquivo - ";NA» 

360 PRINT:PRINT"NUMERO DE RE6ISTR0S = ";QR 

370 PRINT "NUMERO DE CAMPOS = "SNC 

380 PRINT'-NUMERO DE ALTERNATIVAS = ";NS 

383 PRINT"NUMERO DE GRANS ALOCADOS AO ARQUIVO =";INT(GR) 

3K. CLOSE 

390 G0T02570 

500 REM ABRIR NOVO ARQUIVO 

SOS IF NA*<V" THEN GOTO 2550 

510 CLS 

520 INPUT " NOME DO NOVO ARQUIVO ";NA*: PRINT 

525 IF NA*="" THEN GOTO 20 

527 IF LEN(NA*>>8 THEN CLS:PRINT"0 NOME DO ARQUIVO ESTA INCORRET 

< NO MAXIMO 8 CARACTERES >":FOR 1=0 TO 1500:NEXT I : GOTO 205 

530 INPUT " NUMERO DE CAMPOS DO AROUIVO" ;NC: PRINT 

540_ INPUT " NUMERO DE ALTERNATIVAS PARA OS CAMPOS";NS 

545 CLS:PR1NTS960, "TECLE <S> QUANDO ESTIVER NO CAMPO N. 1 PARA V 

OLTAR AO MEN U"; 

550 DIM «A*(NC) :AAK0) = C7.»0: FI-O! IA=1 

553 FD»250/NC:FD»INT(FD):FD=FD>NC 

555 IF FD>255 THEN FD=FD-NC: GOTO 555 

560 OPEN"R", 1,NA* 

565 FIELD 1,255 AS A« 

570 FOR II»1A TO FD/NC 

573 FI=FI+1 

575 QQ=II 

578 PRINTSO. "FICHA ";FI 

580 FOR 1=1 TO NC 

503 AA*(I)="" 

585 PRINT9384, "ENTRE COM A ALTERNATIVA DO CAMPO N. "I It : INPUT AA« 

(I) 

590 IF AA*(1>="9" THEN IF AA*(0)="" THEN CLOSE: QQ=FD/NC:GOTO 640 

ELSE LSET A*=AA«(0) : C7.=C7.-H : PUT 1 , C7.: CLOSE: QQ=QQ-1 : GOTO 640 
595 IF AA*(IKCHR«(65> OR AA* C I ) >CHR* (64*NS> THEN PRINT9420, " 

" ; : GOTO 585 
597 IF LEN<AA»(I))>1 THEN PRINT@420." " ; : GOTO 585 

600 AA*(0>=ftA*(0>>AA*(l> :NEXT I 
603 PRINT9420, " "; 

605 NEXT II 
610 LSET A*=AA*(0>:C7.»C7.*1: IA=1:PUT 1 , C7. 



620 AA*<0>="" 

625 PRINT9420, " "; 

630 GOTO 570 

640 AN*="/V":AN*=NA*»AN* 

650 OPEN"R", 1 ,AN* 

660 FIELD 1,4 AS NC*,4 AS NB*,4 AS FD«, 4 AS OQ* 

670 LSET NC*=MKS*(NC) : LSET NS*=MKS4(NS) 

675 LSET FD*=MKS«(FD):LSET QQ*«MKS* (QQ) 

680 PUT 1,1 

690 CLOSE 1 : GOTO 20 

800 REM PESO. N. 



805 IF NA*= 
810 CLS 
815 NF'-O 
820 INPUT " 
825 IF NF=0 
830 OPEN"R" 



THEN GOTO 2500 



S T E 



REGISTRO 



NUMERO DA FICHA";NF 

THEN GOTO 20 
, 1 .NA* 
835 GT=INT( (NF»NC-1 ) /FD) : PL= (NF«NC-GT«FD) -NC:6T=GT«1 
840 IF GT>L0F(1) THEN GOTO 855 

845 IF GT=L0F(1> AND PL>QQ«NC- (NC-1 ) THEN GOTO 855 
850 GOTO 060 

855 CLOSE: CLS: PRINT"N A HA' E 

GOTO 815 
060 FIELD 1 , 255 AS A* 
870 GET 1,6T 
875 FOR 1=1 TO NC 
880 AA*(I)=MID*(A».PL+I, 1) 
890 NEXT I 
900 CLS:AA=64 

90S PRINTSO, "DADOS REFERENTES A FICHA No.";NF; 
910 FOR 1=1 TO NC 
930 PRINT8AA,"=";I;"- ":AA*(I>; 
935 AA=AA+64 

937 IF AA=1010 THEN GOTO 1020 
940 IF AA>1023 THEN AA=AA-960*10 
950 NEXT I 

955 PRINT93S, "CTRL: <E>,<N>"; 
1000 A*-INKEY*:IF A**"" THEN GOTO 1000 
1O0S IF A*=CHRft(14) THEN CLOSE:GOTO 810 

1010 IF A*=CHR*(5) THEN CLOSE 1 : GOTO 20 ELSE GOTO 1000 
1020 PRINT835, "CTRL 1 <E> , <N> II CONTINUA"; : PR1NT91O10, "CTRL <C 

1030 A*=INKEV»: IF A*="" THEN GOTO 1030 

1040 IF A*=CHR*(5) THEN CLOSElGOTO 20 

1050 IF A«=CHR*(3> THEN CLS: AA-64: PRINT60, "DADOS REFERENTES A FI 

CHA N.";NF:GOTO 950 

1060 IF A*-CHR*(14) THEN CLOSE:GOTO 810 ELSE GOTO 1030 

1100 REM PESQUISA V. 

1105 IF NA«="" THEN GOTO 2500 

1110 CLS 

1115 CN=0:A=1 

1120 1NPUT"NUMER0 DE CONDICOES SOLICITADAS" ; CN: PRINT: PRINT 

1123 IF CN=0 THEN GOTO 20 

1125 IF CN1NC THEN CLS:PRINT"0 NUMERO MAXIMO DE CONDICOES E"';NC 

:CN-0:GOT0 1120 

1127 IF CN<1 THEN CLS:PRINT"0 NUMERO MIN1M0 DE CONDICOES E' 1"!C 

N-0:G0TO 1120 

1130 FOR 1 = 1 TO CN 

1135 CC<I)=0:CS*(I>""" 

1137 PRINT9192,STRING«(63," ">: PRINT9256, STRING* (63, " "> 

1140 PRINT9192, "DE NOo. DO CAMPO REFERENTE A CONDICAO No. "SI 

S : INPUT CC(I) 

1145 IF CC(I)>NC OR CCUK1 THEN PRINT8192, STRING* (63, " " ) ; : CC ( I 

)=0:G0T0114O 

1150 PRINT9256,"DE A ALTERNATIVA REFERENTE A CONDICAO No, "III8I 

NPUT CS*1I) 

1154 IF CS*(IXCHR*(6S> OR CS* ( I ) >CHR« (64*NS) THEN PRINT@256.STR 

ING*(63, " ") ; :CS*(I)="":G0T01 150 

1157 IF LEN(CS«(I)X>1 THEN PRINT9256, STRING* (63, " " ) ; : CS* ( I ) -•"• 

: GOTO 1150 

1160 NEXT I 

1170 CLS:AA=64:CS«0 

HBO PRINTSO, "PESOUISA POR VARIAVEIS » CTRL : <D> <E> <N> * 

"! 

1200 OPEN"R", l.NA* 

1210 FIELD 1,255 AS A* 

1230 FOR 1=1 TO LOF(l) 

1 23S GET 1 , I 

1240 FOR WW-1 TO FD STEP NC 

1245 CK-0 

1250 FOR C0=1 TO CH 

1260 CF*=MID*(A*,WWKCC(C0)-1), 1) 

1270 IF CF*=CS*(CO> THEN CK-CK+1 

1275 NEXT CO 

1280 IF AA=101O THEN GOTO 1300 

1285 IF AAM023 THEN AA^AA-960-HO 

1290 IF CK=CN THEN CS=1 :PRINr9AA, "FICHA"; ( ( 1-1 > .FD.WW4 (NC-1 > J/N 

c; :aa=aa*64 

1293 NEXTWW:NEXT I 

1295 IF CSOl THEN CLS: PRINT9513, "■ NAO FOI ENCONTRADO MENHUM R 
EGISTRO COM ESTAS CONDICOES «":FOR 1-0 TO 1000:NEXT I:CLOSE:CLS 

:GOTO 20 

1297 GOTO 1340 

1300 PRINT956, "CONTINUA"; : PRINTQ1010, "CTRL <C>"1 

1310 B*=INKEV*:IF B*="" THEN GOTO 1310 

1320 IF B*=CHR*(5)_ THEN CL0SE:GOTO 20 

1325 IF B*=CHR«(14') THEN CLOSE: GOTOl 1 10 

1330 IF B«=CHR*(3) THEN CLS: PRINTSO, "PESOUISA POR VARIAVEIS • C 
TRL : <D> , <E> , <N> »"; :AA=64:G0TO 1290 

1335 GOSUB 1360: G0T01310 

1340 PRINT«57,"FIM"| 

1341 B*=INKEV«:IF B*="" THEN 60T0 1341 
1343 IF B*»CHR*,(14) THEN CLOSE: GOTOl 1 10 
1345 IF B*=CHR«(5) THEN CLOSE:GOTO 20 
1350 GOSUB 1360: GOTO 1341 

1360 IF B*=CHR*(4) THEN GOTO 1365 ELSE RETURN 

1365 PRINT90,STRIN6«(63," ");:FORIA=A TO CN 

1367 P1=(IA-A)»10 

1369 PRINT962, " "I 

1370 PRINT9PI,",»)CC(IA);:PRINT"= ";CS*(IA)S 
1375 IF IA=A*-5 THEN A=A+6:PRINT@62, "»*";: RETURN 
1380 NEXT IA:RETURN 

1400 REM TAB. DE FREQUENCIA 

1405 IF NA*-"" THEN GOTO 2500 
1410 CLS 



!*S> 



14 



MICRO SISTEMAS, junho/86 



MICRO SISTEMAS, junho/86 



lb 



AVARIA/BAS 



R E G : S T R 



"; :AA*(I)="' 



"CPRINTSAA,"""; I|"- "SAA*<I-1> 

"; :PRINT@AA, "="; I; "- ";AA<(I) 



111S CN-0 2005 IF NA«="" THEN GOTO 2500 

1420 INPUT-NUMERO DE COND I CDES" 1CN: PRINT: PRINT 2010 CLS 

1425 IF CN-0 THEN GOTO 20 2015 NF»0: AA-64:CA=0 

1430 IF CN>NC THEN CLS:PRINT"0 NUMERO MAXIMO DE CONDICOES E""iNC 2020 INPUT "NUMERO DA FICHA PARA ALTERACAO" ; NF 

:CN»0:GUTO 1420 2025 IF NF=0 THEN GOTO 20 

1435 IF CN<1 THEN CLS:PRINT"0 NUMERO MINIMO DE CONDICOES E* 1":G 2030 OPEN"R", 1 ,NA» 

OTO 1415 2035 GT-INT1 (NF*NC-1 > /FD) : PL= CNF»NC-GT»FD) -NC: GT-GT-M 

1440 FOR 1=1 TO CN 2O40 IF GT>L0F(1> THEN GOTO 2035 

1445 CC(I!=0:CS*(I)="" 2045 IF 6T-L0F < 1 ) AND PL>00»NC- (NC-1 ) THEN GOTO 2055 

1447 PRINTB192,STRING*<63," ">: PRINT8256, STRING* <6S, " "> 2050 GOTO 2060 

1450 PRINTS192, "DE No. DO CAMPO REFERENTE A CONDICAO No. "1 If : 2055 CLOSE:CLS:PRINT"N A O H ft' E S 

INPUT CC1I> ":GOTO 2015 

1453 IF CC(l)-0 THEN CL0SE:GOT0 1410 2060 FIELD 1,255 AS At 

1455 IF CC(I)>NC OR CCUK1 THEN PRINT8192. STRING* (63, " " > ) : CC ( 1 , 2070 GET 1 , GT 

>'0: GOTO 1450 2075 FOR 1 = 1 TO NC 

1460 PRINT82S6, "DE A ALTERNATIVA REFERENTE A CONDICAO No. ";I;:I 2080 AA* ( I ) =MID* (A*, PL*I , 1 ) 

NPUT CS*(I) 2O90 NEXT I 

1465 IF CS*(IXCHR*(65) OR CS« < I > >CHR« (64tNS) THEN PRINT8256, STR 2100 CLS:PRINT@0, "ALTERACAO DA FICHA No."!NF! 

ING»(63," ") ; :CS*(I>="":G0T01460 2110 AA=64 

1470 IF LENICSKI) )<>1 THEN PRINT8256, STRING* (63, " " ) ; : CS* ( I ) -" " 2150 FOR 1 = 1 TO NC 

:G0T01460 2155 AA* ( 1-1 ) -AA* ( I ) : AA* ( I ) »" " 

1475 NEXT I 2160 PRINT8AA, "="; I ; "- "! : INPUTAA* ( I ) 

1400 CLS:AA=64:CS=0 2170 IF AA*<I)»"" THEN GOTO 2200 

1483 PRINTeS30,"E SPERE UM MOMENT 0" 2180 IF AA* ( I XCHR* (65) OR AA* ( I > )CHR* (64*NS> THEN PRINT8AA, » 

1485 OPEN"R", 1,NA* » ; : AA* ( I ) =" " :G0T0 2160 

1490 FIELD 1,255 AS A* 2185 IF LEN (AA* ( I ) ) >1 THEN PRINT8A0, " 

1495 FOR Y=l TO LOF ( 1 > GOTO 2160 

1500 GET I,Y 2190 GOTO 2210 

1505 FOR WW=1 TO FD STEP NC 2200 PRINT8AA, " 

1510 CK=0 2205 GOTO 2215 

1515 FOR C0=1 TO CN 2210 PRINT8AA, " 

1520 CF*=MID*(A*,WW*-(CC(C0)-1),1) 2213 AA* ( 1-1 ) =AA* ( I ) 

1525 IF CF*--CS«(CO) THEN CK=CK*1 2215 AA=AA*10: CA=CAH : IF CA=6 THEN CA"0:AA=AA*4 

1530 NEXT CO 2220 IF AA=970 THEN F0RHK=1 TO 1000: NEXTHK:CLS:PRINT80, "ALTERACA 

1535 IF CK=CN THEN CS«CS*1 DA FICHA No. " i NF: AA=64: CA=0 

1340 NEXTWW 2230 NEXTI 

1543 NEXTV 2233 PRINT850, "FIM"; 

1545 TR=L0F(1)-I 2235 LE«=LEFT* (A*, PL) : RI*=RI6HT« (A*, 255- (PL+NC) ) : AA* (NC) =LE« 

1550 TR-TRKFD/NC) *Q0 2240 FOR 1-1 TO NC 

1555 CLS:PRINT812,"T ABELA DE FREOUENCI A":PRIN 2245 AA* (NC)=AA* (NO *AA* ( 1-1 ) 

T:PRINT"T OTAL DE REG. « FREOUENCIA«PERC 2250 NEXT I 

E N T." 2255 AA* (NC) =AA« (NC) »R1« 

1560 PRINT" « « 2260 LSET A*=AA*(NC) 

":PRINT" ■ 2265 PUT 1 , GT 

IC:PRINT" • B 2270 CLOSE:GOTO 20 

" 2300 RUN 

1S65 PRINTe263,TRl:PRINT828S,CSi 2400 CLS:CMD"DIR" 

1570 PR*=TR/100:PR=CS/PR:PRINT@308, ""; :PRINT USING ■*#•#. Ittt" ; PR; 2410 PRINT8965, "TECLE < 

1575 FRINT@S76,"C0NDIC0ES PESOUISADAS : " 1 : AA=600: FOR 1 = 1 TO CN E N U "; 

1580 PRINT8AA, ", ";CC(I) ;"- " I CS* ( I ) I " "; 2420 A*"INKEY«: IFA*=" " THEN GOTO 20 ELSE 60T0 2420 

1S83 PRINT8600," "; 2500 CLS:PRINT8I2B, "NAO HA' NENHUM DADO NA MEMORIA; VOCE DEVERA' 

1583 aa=aa+8:next I passar pela opcao :": PRINTS PRINT 

1590 PRINT8896,"T E C L E : CRLT <E> - PARA V0LTAR AO MENU"! 2510 PRINT"1 - PARA LER UM ARQUIVO JA' GRAVADO" : PRINT" 

1595 PRINT8972, "CRLT <N> - PARA DAR NOVAS CONDICOES"; 0U":PRINT"2 - PARA ABRIR UM NOVO AROUIVO" 

1600 A*=INKEY*:IF A*""" THEN GOTO 1600 2520 PRINT8965, "TECLE <<< ESPACO >>> PARA VOLTAR AO 

1610 IF A*=CHR*(5) THEN CLOSE:GOTO 20 MEN U"; 

1620 IF A»=CHR*(14) THEN CL0SE:GOTO 1410 2530 A*=INKEY*:IF A*-" " THEN GOTO 20 ELSE GOTO 2530 

1700 REM ENTRADA DE REGISTROS 2S50 CLS:PRINTei28, " JA' EXISTE UM AROUIVO ON LINE: VOCE DEVE PAS 

1705. IF NA«="" THEN GOTO 2S00 EAR PELA OPCAO" : PRINT: PRINT 

1710 CLS 2560 PRINT: PRINT"B, PARA LIBERAR A MEMORIA"! 

1720 OPEN"R", 1,NA* 2370 PRINT8965, "TECLE <<< ESPACO >>> PARA VOLTAR AO 

1730 IF QQ-FD/NC THEN GOTO 1735 ELSE GOTO 1750 MEN U"l 

1735 PRINT8960, "TECLE <8) (OUANDO ESTIVER NO CAMPO No. J) PARA VO 2580 A*=INKEY«: IF A*=" " THEN GOTO 20 ELSE GOTO 2580 

LTAR AO M E N U"; 2600 CLS:PRINT851B, "0 AROUIVO "|NA*;" NAO ESTA' GRAVADO NESTE DI 

1740 IA-l:C7.=L0F(l) :FI=(FD/NC)«LOF(1):GOTO 565 SKETTE" 

1750 IA=OOH:FI=(FD/NC)»(LOF(1)-1)+00:C7.=LOF(1>-1 2610 PRINT8965, "TECLE <<< ESPACO >>> PARA VOLTAR AO 

1760 FIELD 1,255 AS A* MEN U"; 

1763 D7.=L0F(1) 2620 A*=INKEY»: IF A*=" " THEN RUN ELSE GOTO 2620 

1763 GET 1,D7. 

1767 PRINT8960, "TECLE <@> (OUANDO ESTIVER NO CAMPO Mo. 1 ) PARA VO 

LTAR AO M E N U"; 

1770 AA*(0)=M1D*(A*, 1 , NC»00) : GOTO 370 , 

2000 REM ALTERACAO ! 
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Os melhores especialistas, programas, 
equipamentos, formularios, manutencao, 
cursos, livTaria, videoclube. Tudo para Informatica, 
com seguranca e garantia, num so lugar. 
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1.° Shopping de Informatica do Brasil. 



•Computer Shopping 
Moore 

• Computerware 
•CRT. 

• Data Ribbon 
•Plamengo Video Club 

• "Mikros 



rgo do Machado, junto ao Metro. Aberto i 



-AlephSistemas 
e Metodos 

■ Andraus 
Informatica 

■ Ciencia Moderna 
Computacao 

'Compumix 



• Racimec 

- R&T Informatica 
•Trade Informatica 
•Unitel 

• Videomatica 




E5TACI0MAMEMT0 PROPRIO. 



C0MPATIVELC0M 
IBM PC/XT (*) 



SP16 

PROLOGICA 



• VERSAO I 

2 drives, slims, FD/DD, 
320 kbytes 

• VERSAO II 

1 drive FD/DD, 320 kby- 
tes, memoria RAM e Win- 
chester 5/10/15 Mbytes. 



<il .'••■•••■ v '\< \TO 



(precos sob consulta) 



PLACA 
EXPANSAO 
P/ SP16 



Placa expanslo de 320 kby- 
tes, expandindo ate 640 
kbytes de memoria RAM 
para SP-16. 

Placa de CP/M para SP-16 
com 64 kbytes. Transforma 
restante da memoria em 
RAM DISK. 



COMUNICACAO 



Placa rede de comunicacao 

NCT-7301, para interligar 

varios SP-16. 

Placa emuladora de terminal 

IBM 3278/3279 NCT-7101 

PCOX. 

Placa emuladora de terminal 

IBM 3278/3279 NCT-7201 

IRMA. (precos sob consulta). 



MICROS 



CP-500 022D-M80, 1 drive 

FD/DD, DOS-500, CP/M 80 

colunas. 

CP-500 023D-M80, 2 drives 

FD/DD, DOS-500, CP/M 80 

colunas. 

CP-400 color II 64 kbytes. 

CP-200S, 16 kbytes (precos 

sob consulta). fjt^f 



;*) IBM e marca registrada da 
International Business Ma- 
chine. 



ASSISTENCIA 
TECNICA 



DIRETO: (011) 220-5794 
• Consertos, contrato de ma- 
nutencao, pecas de reposi- 
cao (condic5es especiais p/ 
ass. tecnica). 



INTERFACES E 
PERIFERICOS 



Software video texto para 

CP-500. 

Software video texto para 

SP-16. 

Modem EMBRACOM. 

CP-532C (RS232/CP500). 

Serial 300. 

Joystick CP-400. 

Placa CP/M para CP-500 M. 

80 com 128 kbytes RAM. 

Cabos de ligacao micro/im- 

pressora. 



SOFTWARE 



• DATAFLEX: 

— Gerador de banco de dados 
relacional. 

— Multi e mono usuario 8 e 16 
bits. 

— Gera aplicativos como: con- 
trole de estoque, contas a 
pagar e receber, cadastro de 
cliente, mala direta, folha de 
pagamento, etc. 

(Precos sob consulta) 



SUPRIMENTOS 



Diskettes 5 1/4" caixa com 

10 unidades FS/DD e FD/ 

DD. 

Formulario contfnuo 1 via: 

— 80 colunas (milh.). 

— 132 colunas (milh.). 
Fitas para impressora: P-500, 
P-720, P-740. 

Mesa para computadores. 
Estabilizadores de tensao: 
0,8 kVA- 1,5 kVA. 



IMPRESSORAS 



• P-500S paralela ou serial 
150 CPS, 80 colunas, carac- 
teres normais, comprimidos 
e expandidos, grafico com- 
patfvel com MX-80. 

OBS.: compati'vel com APPLE, 
EXPERT, HOT BIT, SP-16,etc. 

• P-720 paralela e serial 200 
CPS 132, colunas e compa- 
ti'vel com MX-100. 

• P-740 paralela e serial 400 
CPS, 132 colunas. 

(precos sob consulta). 



REVENDAS F^ 

BAURU-SP *^ 

Microl6gica Tel. (0142)23-6142 

BE 1.0 HORIZONTE - MG 

ComputronixTel. (031 1225-3305 

Digilogica Tel. (03 1)223-4966 

CAMPINAS - SP 

Soft En Byte Tel. (0192)52-6369 

CAMPO GRANDE - MS 

New Line Tel. (067)382-0682 

CATANDUVA - SP 

Catanduva MaqTeK0 1 75)22-6 1 67 1 

CURITIBA-PR 

CSR Tel. (041 1232-1750 

FERNANDOPOLIS - SP 

Compshow Tel. (01 74)42-1697 

FORTALE2A-CE 

Siscomp Tel.:(085)244-4911 

GOlANIA-GO 

Soft New Tel. (062)224-9322 

GOVERNADOR VALADARES 

Computron Tel. (0332)21-8412 

NATAL - RN 

Maximicros Tel. (084)222-891 8 

PC-COS DE CALDAS - MG 

Micro Pogos Tel. (035)721-1883 

PORTO ALEGRE - RS 

Hercos Tel.:(0512)25-4923 

RECIFE -PE 

Croma Tel. (081 1325-3493 I 

RIO DE JANEIRO- RJ 

Sinclair Place Tel, (021 1549-2699 

Sisteco Tel. (021)220-9613 

SBC Micro's Tel. (01 1)448-6234 

SAO PAULO - SP 

Cinbtica Tel. (011) 36-6961 

Benny Micro Tel. (01 1)570-1 555 

Bolsa do Micro Tel. (01 1 193-1 102 I 

Citty Micros Tels.(011)831-0944| 

Iguatemicro Tel.:(01 1)81 5-9701 

Garra Tel.(01 1)884-3042 

NC Micro Tel. (01 1)533-4388 

Opus Tel. (01 1)273-5757 

Provac Tel.(01 1)274-5861 

Tropical Tel. (01 1)543-9859 

Sisec Tel. (01 1)283 0853 

Cistec Tel. (01 1)288-5413 

SOS Comp. Tel. (01 1)826-0466 

SAO VICENTE - SP 

Alta-Resol, Tel. (0132)67-2496 

TAUBATE - SP 

Ensicom Tel. (0122)33-2944 

SAO CARLOS - SP 

HDG Tel. (0162) 72-2449 

ARACATUBA - SP 

Produza Tel. (0186) 23-0519 

ribeirAo PRETO - SP 

Oatadados Tel. (016) 635-2331 

UMUARAMA-PR 

CBM Tel. (0446)23-2233 

VITORIA-ES 

Casa dos TelTel. (027)222-501 L 

Composoft 222-5758 

WR Comp (027[ 

2253144^ 
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TK 3000IIe: caracteristicas 




O TK 30001 le, da Microdigital. 

O TK 3000lle "Enhanced", 
que foi recentemente lancado pela 
Microdigital e e compatfvel com o 
Apple lie "Enhanced", da Apple 
Computer, possui 64 Kb de RAM 
e 16 de ROM e utiliza o micropro- 
cessador 65C02, que reduz o tem- 
po de execucao de alguns progra- 
mas. Possui tambem oito slots, 
sendo sete deles conectores e um 
para encaixe de placas de memo- 
ria e cartdes controladores de pe- 



Informotica 
na Academia 

O Presidente da Acade 
mia Brasileira de Letras, Aus- 
tregesilo de Ataide. inau- 
gurou no dia 24 de abril o 
Banco de Dados da Acade- 
mia. A ideia de introduzjr 
a informatica na Instituicao 
foi dada pelo Professor Ar- 
naldo Niskier, em 1984. 
Pouco depois, o projeto foi 
apresentado a empresa cario- 
ca Tecnosoft, que se encar- 
regou do desenvolvimento 
do sistema. 

O BDA, como e chamado 
o banco, foi desenvolvido pa- 
ra um Nexus 1600, da Sco- 
pus. Oevido ao grande volu- 
me de dados a ser armaze- 
nado, em torno de 60 Mb, 
foi requisitado a Scopus, em 
carater especial um disco r(- 
gido do tipo Winchester. 

Na verdade, o Banco da 
Academia e composto por 
dois bancos de dados distin- 
tos: um com informacoes so- 
bre os esc mores da li'ngua 
portuguesa, sua obras, esti- 
los e generos literarios: e 
outro formado pelo Vocabu- 
lario Ortografico e pelo Di- 
cionario llustrado da Li'ngua 
Portuguesa, contendo verbe- 
tes e sens significados. 

Embora ainda nao esteja 
completo, pois o levanta- 
mento de dados requer tern 
:)o e pessoal disponi'veis, o 
BDA ja esta funcionando, 
Para consulta-lo, o usuario 
pode ligar para (021) 262- 
1313 ou comparecer a Av. 
Presidente Wilson, 231/2 9 
andar, Castelo - Rio de Ja- 
neiro. 



rifericos. Pode ser incorporado 
ao micro uma placa PAL-M, o 
que torna possfvel a utilizacao 
de um aparelho de televisao co- 
mum, sem qualquer necessidade 
de adaptacao. 

O TK 30001 le vem com te- 
clado inteligente, dotado do mi- 
croprocessador Z-80, e pode ser 
reprogramado em ate 512 carac- 
teres. Alem "disso, possui um 
teclado numenco com 12 teclas, 
prbprio para planilhas eletronicas. 
Quanto aos perifericos, estao dis- 
ponfveis placas de expansao de 
membria, que ja incorporam a 
possibilidade de aumentar o vi'deo 
para 80 colunas; interface especial 
para impressora, incluindo buffer 
de 16 Kb e interface para ate duas 
unidades de disco ilexivel de 
5 1 /4". Permite tambem a cone- 
xao de qualquer placa CP/M 
existente no mercado para a linha 
Apple, alem de outros canoes. 

Vale lembrar que os softwares 
para o Apple lie Enhanced ro- 
dam no TK 3000, assim como os 
programas disponfveis para o anti- 
go Apple II Plus. 

Micropic video 

A Micropic, empresa que ini- 
ciou uma nova fase como fabri- 
cante de hardware, esta lancando 
um monitor de vfdeo monocro- 
matico de 12". O Micropic Vf- 
deo, como e chamado, possui 25 
MHz; controles frontais de verti- 
cal e horizontal, com inverse e 6 
totalmente nacional. 

A empresa pretende produzir, 
a partir de 1987, 500 unidades/ 
mfis de monitores, mas tern o 
objetivo de, a medio prazo, 
obter de 10 a 15% do mercado 
nacional. 

Outro lancamento da Micropic 
e um software especffico para 
pequenos e medios escritorios de 
advocacia. O software e composto 
por cinco modulos: agenda, con- 
tas a pagar, a receber, cartas e 
acompanhamento de processo e 
roda em micros das linhas Apple 
e PC. Cada modulo custa 20 
OTN. A" Micropic fica na Av. 
Sumare, 287, SP - Tel.: (011) 
263-8200. 

Feira SENAC 

Sera realizada de 1 a 6 de ju- 
Iho, das 14:00h as 22:00h, a 
III Feira SENAC de Informatica 
de Ribeirao Preto, na qual varias 
empresas do setor irao expor e 
vender seus equipamentos e servi- 
cos. 

Paralelo a Feira, tambem sera 
promovido o IV Simpbsio de In- 
formatica de Ribeirao Preto, com 
palestras que procurarao atender 
ao interesse de fabricantes, forne- 
cedores e usuarios. O evento acon- 
tecera no SENAC local, que fica 
a Av. Capitao Salomao, 2133, 
CEP 14100, tels.: (016) 624-2900 
e 624-5449, Ribeirao Preto - SP. 
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I Fenasi' 86 

Inaugurada com a presenca do 
subsecretario industrial da SEI, 
Leopoldo da Silva Pereira, a I 
Fenasi 86 — Feira Nacional de 
Acess6rios, Suprimentos e Insta- 
lacdes para Informatica, reuniu 
50 empresas, de 24 a 27 de abril, 
no Palacio das Convencoes do 
Anhembi, em Sao Paulo. 

Segundo o presidente da AN- 
FORSAI — Assoc iocao Nacional 
>dos Fornecedores de Suprimen- 
tos e Acessorios para Informatica 
— Sergio Pelegrino, o setor con- 
grega hoje 143 empresas no pais, 
dentre fabricantes, distribuidores, 
revendedores e representantes, e 
seu crescimento nos ultimos tem- 
pos foi igual ou maior ao da in- 
dustria nacional de computadores 
e perifericos. 

Entre os lancamentos, a Bur- 
roughs apresentou, simultanea- 
mente no Brasil, Australia e EUA, 
o BU 8000, equipamento para 
analisar, avaliar e limpar fitas 
magneticas, com contador de 
erros por trilha e bordas, controla- 
do por microprocessador, com 
duas cabecas, lamina auto-afiavel, 
tracks em 6250 bpis, e opcao para 
parar os erros, permitindo a reu- 
tilizacao parcial ou total das fitas. 

A Magtec, fabricantedeacesso- 
rios, investiu US$ 1.500.00 em 
tnSs novos produtos: discos magne- 
ticos flexfveis, em todas as ver- 
s6es, tamanhos de 8" a 5 1 /4"; 
data cassete digital, e fita magne- 
tica em versoes de 2.400, 1.200, 
600 e 300 pes, alem da de 3.000 
pes, 600 a mais do que as fitas 
normais. 

A KMP, coligada a Pirelli, 
apresentou cabos para conexao 




Os novos discos da Magtic 

em computadores Radiofelx_ e 
Audioflex, destinado a instalacoes 
em terminals, sistemas de radio- 
comunicacao, radiodifusao e tele- 
fonia; e o Flat Cable, para inter- 
ligacao de aparelhos eletronicos 
perifericos para informatica, 
circuitos e estagios dentro de um 
mesmo equipamento. 

No stand da Propasa Infor- 
matica as novidades foram o 
Inker Plus, recuperador de fitas, 
impressoras matricais para reutili- 
za-las ate 15 vezes; embalagens co- 
loridas de disquetes, para separa- 
tes por assunto; e o Ergonom, um 
prolongamento da base de micros, 
para usuarios Apple, com local 
para lapis, maquina de calcular e 
guardar disquetes. 

Ja a Mowag apresentou o 
Arkit, primeiro arquivo em aco pa- 
ra disquetes, com trilhos telescd- 
picos, podendo guardar o dobro 
dos ficharios convencionais. 

Participaram da I Fesani'86 
empresas de portes d iversos, como 
a IBM, Memorex do Brasil, He- 
lios, Electra, Sysdata, Dynaflex, 
Hytec, Telexpel, Senter, Jel -Print 
eTex-Print. 



Winchester de 3 1/2' Mais servicos 



A Elebra devera colocar no 
mercado ainda em 1986 seu dis- 
co rfgido de 3 1/2" e 10 Mb, 

conhecido como "Projeto Tos- 
tao". A nova linha de Winchester 
W300, leves e compactos, a serem 
produzidos na moderna fabrica, 
inaugurada em Janeiro, em Sao 
Paulo, atendera micros pessoais, 
profissionais ou comerciais, e tam- 
bem aos portateis. Antonio Harol- 
do P. Arantes, gerente de produ- 
cao da area de discos, garante 
que o projeto Elebra conta com 
tecnologia totalmente nacional. 



Os assinantes do Telegame, de 
Sao Paulo, ja podem com varios 
outros servicos. Alem dos 500 
jogos que ja oferecia, o sistema 
dispcic!. entre outros, de tabela 
de reajuste de salarios e alugueis; 
local izacao dos quiosques de 
bancos 24 horas; tabela de conver- 
sao de cruzeiros para cruzados; 
retrospectiva dos jogos da loto, 
com os numeros sorteados; loca- 
lizacao dos hospitals e pronto- 
socorros de SP; lista de 150 tele- 
fones uteis e enderecos de res- 
taurantes paulistas. Informacoes » 
pelotel.: (011) 280-1796. oB 
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C0M0COMPRAR: 

NAO RECORTE SUA REV1STA. FAgV\ O SE J PEDIIX) POR CARTA REhACIONANDO 5EUS DADOS E OS CftDIGOS DOS PROGRAMAS DESEJAOOS 
ANEXE A CARTA UM CHEQUE NOMINAL A SOFTSPKED, Rua Gorwaga Baslo* i\? 1 12 - Cep 2054 1 - Rio de Janeiro - RJ. As deapesan do concio )fi «sl«o ln«liiH«& 

SOFTSPEED 
RUA GONZAGA BASTOS 112 • 20541 ■ RIO DE JANEIRO 




Perifericos para MSX 



Supermicro da Digirede 



Os pianos da Gradiente para 
1986 incluam o lancamento de 
varios perifericos para o Expert, 
conforme afirmou Mauricio Ar- 
ditti, Vice-presidente Tecnico da 
empresa. Ja esta pronto um mo- 
dem para acesso aoSistema Video- 
texto, atraves de software em car- 
tucho, que estara disponivel no 
mercado, no infcio do segundo 
semestre, disse ele. Mais para o 
final do ano, sera lancado um car- 
tao de 80 colunas. 

A Gradiente esta incentivando 
outros fabricantes a produzir e 
colocar no mercado perifericos 
para o Expert. A Microsol, de 
Fortaleza, por exemplo, lancara 
em breve drives de 5 1 /4", com 
face simples e capacidade para 
180 Kb; controlador de drives; 
gravador de EPROM; e placa de 
expansao de 80 colunas, e ainda 
esta estudando a viabilidade de 
produzir RAM disk de 256 
Kb. Ja a Embracom esta desen- 



Tropic Informatica 

Ricardo Tondowsky e Manoel 
Ribeiro Junior, ex-diretor e ex- 
gerente de vendas da Microdigital, 
respectivamente, inauguraram a 
software -house Tropic Informdti- 
ca, que comercializa produtos pa- 
ra o TK90X e MSX com a marca 
Disprosoft. 

A Tropic esta incentivando a 
producao de software nacional, 
contratando jovens que desenvol- 
vem programas. Cada software 
levara a marca Disprosoft e o 
nome do seu criador, que rece- 
bera por fita vcndida. Quern de- 
sejar se candidatar, deve ligar 
para (011) 265-8516 ou escre- 
ver para a Caixa Postal 16441 
— Sao Paulo. 



volvendo um modem para a li- 
nha MSX. 

Outro projeto da Gradiente 
6 a producao de discos flexi'veis 
de 3 1 12", que ainda devera ser 
entregue a SEI. A maior dificul- 
dade reside na nacional izacao de 
partes mecanicas de precisao, ex- 
plicou Mauricio Arditti. pois o 
projeto preve inicialmente um 
indice de nacionalizacao de ate 
70%, e o desejavel pela SEI 
seriade100%. 

Caso chegue-se a um acordo, 
os discos para a linha MSX serao 
fabricados ainda este ano, ou no 
infcio de 1987, para aterider aos 
micros da empresa, estimando- 
se uma producao mi'nima de cer- 
ca de 20% dos Experts vendidos 
mensalmente. Embora a intencao 
da Gradiente nao seja a fabricar 
discos para terceiros, nem vende- 
los em sistema OEM, estS estu- 
dando pedido da Unitron de 
compra los e adapta-los ao Macin- 
tosh. 



Ampliando a gama de seus 
produtos, a Digirede, hoje com 
um parque de 1.400 equipamen- 
tos instalados na area de automa- 
cao bancaria, lancou o sistema 
multiusuario 8000, um supermi- 
cro que suporta ate 32 terminals, 
interagindo com sistemas opera- 
cionais CP/M e MS/DOS. 

O sistema multitarefa conta 
com CPU Motorola 68010; clock 
de 10 MHz; processador inteligen- 
te Z-80, com 64 Kb de mem6ria; 
interfaces RS232-C e RS-45; 
dois discos Winchester de 5 1 /4, 
da pr6pria Digirede, de ate 300 
Mb, formatados em cinco opcoes, 
permitindo conexao de ate dois 
discos rfgidos de 5 1 /4: e sistema 
operacional Digix, versao Digirede 
do Unix. O equipamento serve 
para aplicacdes nas areas de indus- 
tries, comircio e administracao, 




O Digirede 8000. 

e a empresa espera vender 200 
unidades este-ano. Os precos va- 
riant de Cz$ 300 mil a Cz$ 1 
milhao. 



Novidades na UD 



Soft 16 bits 



A Real — Soft desenvol- 
veu diversos sistemas aplica- 
tivos para micros IBM-PC de 
16 bits. Entre eles, controle 
de loteamentos, contas a pa- 
gar, a receber, ativo fixo, 
contabilidade, controle de 
processamento de cobrancas 
mercantis, faturamento, fo- 
Iha de pagamento, gestao e 
controle da carteira de pedi- 
dos e controle de performan- 
ce, para corridas de cavalos. 
O endereco da Real - Soft 
e Rua Termopilas, 462, Sao 
Paulo. CEP 04635. tel.: (01 1) 
241-1976. 



As empresas de informatica 
marcaram presenca na UD paulis- 
ta deste ano e aproveita- 
ram o evento para mostrar novos 
produtos. A Dynacom, por exem- 
plo, apresentou quatro prot6tipos 
do MSX 1.800, embora o lanca- 
mento s6 esteja previsto para o 
final do ano, ou mesmo infcio 
de 1987. No momento, a Dyna- 
com vem mantendo conversacoes 
com os fabricantes de micros 
da linha MSX — Sharp e Gradien- 
te — para viabilizar uma total 
compatibilidade do aparelho. 

Um forte etrativo do novo 
micro serao os 100 programas, 
entre jogos e utilitarios, que o 
usuario recebera gratuitamente, 
ao adquiri-lo. 

Outro equipamento da em- 
presa, o MX 1600 Color, de 64 



Kb, teve boa recepcao na UD. 
Ele tambem esta sendo comercia- 
lizado com 100 programas gratui- 
tamente, incluindo editor de 
texto, planilha de c^lculo, contro- 
le de estoque e outros aplicativos. 
Joa no stand na Dismac, a 
vedete foi a familia de PCs, cujo 
micro de configuracao mi'nima e 
o PC 16, com microprocessador 
Intel 8088; co- processador nume- 
rico Intel 8087, opcional; mem6- 
ria RAM de 256 Kb, expandfvel 
ate 768 Kb; ROM-BIOS de8 Kb. 
e ate 64 Kb de EPROM; oito 
concctores para placa de expan- 
sao; autofalante com tons de au- 
dio programavel por software; e 
caixa com ventilacao, permitin- 
do atd quatro expansdes. com 
floppies, Winchesters ou fitas, 
Completam a fami'lia o PCxt e o 
PC Multiusuario. 



STRINGS 



SP — A Itautec Informatica 
inaugurou mais uma loja em Sao 
Paulo, na Rua TabapuS, 627, 
Itaim, SSo Paulo. 

RJ - O LTD Informatica 
promove regularmente cursos de 
treinamento modular em microin- 
formatica (formacaode analistas), 
programacao e analise e projetos 
de sistemas, com opcao de diver- 
sas datas de infcio. Maiores in- 
formacdcs a Av. Rio Branco, 
173 - sblj, tel.: (021) 262-9364, 
Centro - R J. 

MG - De 23 a 27 de julho es- 
tara se realizando no Minascentro, 
em Belo Horizonte, o III INFO- 
RUSO — Encontro Mineirode In- 
formatica e Feira de Informatica. 
InformacSes pelo tel.: (031) 225- 
1944; MG, ou telex (031) 6074 
NFCE BR. 

SP - A ABAC - Associacao 
Brasileira de Automacao Comer- 
cial — promovera, de 7 a 1 1 de 



julho, no Palacio das Convenpoes 
do Anhembi, em Sao Paulo, o 
III Congresso Nacional e III Feira 
Internacional de Automacao Co- 
mercial. Maiores informacoes pelo 
telefone (011) 280-0890. 

RJ — O IBPI criou um progra- 
ma de estagios, com o objetivo 
de encaminhar seus alunos ao 
mercado de trabalho. As empresas 
interessadas em participar do pro- 
grama podem se cadastrar atraves 
do telefone (021) 275-2143. 

SP — Jorge Luis dos Santos e 
Paulo Rodrigues Lauand, ex- 
responsaveis pelas areas de marke- 
ting e tecnica da Microdigital, 
respectivamente, formaram uma 
nova empresa, a Connectin Tec- 
nologia Informatica Ltda. 

SP — A Cobra 6 a li'der nacio- 
nal de vendas de supermicros, 
com quase 80% do mercado. 
Em 1985, o produto mais vendido 
pela empresa foi o Micrao Cobra 



480, com cerca de 650 unidades 
comercializadas. 

SP — Nfvio Flores 6 o novo 
diretor de marketing da Prot6gica. 
Com oxperiencia em empresas co- 
mo a Singer e a Quaker, Nfvio 
pretende consolidar uma ponto 
entre o usuario e a Prol6gica, for- 
talecendo os revendedores em ter- 
mos tecnicos e comerciais. 

RJ — Na reuniao-almoco, pro- 
movida pela SUCESU, ha cerca de 
tres semanas, o secretfirio da SEI 
Prof. D6ria Porto surpreendeu a 
imprensa ao declarar que a secre- 
taria de informatica levara para a 
pauta da reuniao do CONlN ape- 
nas a questao da comercial izacao 
do software, enquanto o Ministro 
da Ciencia e Tecnologia Renato 
Archer afirmava, semanas antes, 
em diversas ocasides, que. a ques- 
tao jurfdica do software seria 
discutida no ambito do CONIN. 
Ao que parece, os altos escaloes 
da tecnologia de informatica nao 



estao conseguindo falar a mesma 
Kngua. 

RJ — O dr. Jose Maria Sobri- 
nho, que durante tres anos foi 
presidents da Assessoria Nacio- 
nal e atualmente representava a 
entidade no CONIN - Conselho 
Nacional de Informatica e Auto- 
macao, foi dispensado da funcao, 
segundo decreto assinado pelo 
presidente Jose Sarney em 02 de 
maio. Agora, Nilton Trama, atual 
presidente da Assespro Nacional, 
passa a exercer a funcao. De fato, 
foi o proprio Trama que enviou 
telex ao ministro Renato Archer 
pedindo a substituicao de Sobri- 
nho. Tal atitude deixou claro o 
"racha" por que passa a Assespro. 
De um lado, o Rio (102 associa- 
dos) ap6ia Sobrinho. Sao Paulo 
(78 associados) fecha com Nilton 
Trama. E as regionais. . . uns di- 
zem que se omitiram, enquanto 
outros garantem que aprovaram H 
a medkJa. .'-■ i 




O APPLE DA DIGITUS 



A DIGITUS langa o DGT-AR um 
microcomputador pessoal totalmente 
compativel em hardware e software com 
a linha APPLE II PLUS e seus similares. 

DGT-AP e um micro versatil, pois, alem 
de Ihe ser util no trabalho, voce podera 
tambem usa-lo no lazer e nos estudos 

Devido ao grande numero de programas 
desenvolvidos para a linha APPLE, o DGT- 
AP tern ampla aplicagao tanto para as 
pequenas e medias empresas como para 
os executivos e os profissionais liberals. 




Projetado para atender e acompanhar o 
desenvolvimento do usuario, o DGT-AP 
possui estrutura para aceitar futuras 
expansoes, crescendo de acordo com 
suas necessidades. 

O DGT-AP tern todas as caracteristicas 
basicas comuns a um micro da linha 
APPLE com a vantagem de um teclado 
numerico reduzido incorporado a CPU. 

Alem de todas as placas disponiveis para 
expansao, voce tern ainda a garantia da 
tecnologia DIGITUS. 

Conheca o DGT-AP nos enderegos abaixo 
e nos revendedores autorizados DIGITUS. 
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O futuro chegou 



Oito de julho de 1853. Como- 
doro Matthew Calbraith Perry, 
no comando de uma poderosa 
frota de guerra ancora na Bai'a 
de Toquio e for?a o Jap2o a assinar um 
acordo de relacionamento politico e co- 
mercial com os Estados Unidos, pondo 
fim a dois se'culos de isolamento auto- 
imposto do pais asiatico. Em meio as 
conversafSes, a troca de presentes: arte 
japonesa — lacas, bronzes, porcelanas e 
brocados — por tecnologia americana — 
equipamentos de telegrafia; um modelo 
reduzido de trem a vapor; implementos 
agricolas e armas de fogo. 

Inicio dos anos 1980, Detroit, EUA. 
Em meio a uma serie crise economica, 
trabalhadores desempregados da outrora 
pujante indiistria automobilistica — o 
simbolo por excelencia do American 
Way of Life - destroem a golpes de 
marreta um bonito automovel japones 
em protesto contra a invasao do merca- 
do americano por produtos importados, 
principalmente do Japao. 

Habituados a assombrar o mundo 
com o seu poderio industrial e tecnolo- 
gico (fora o economico e militar), os 
norte-americanos come9am agora a ver 
ameacada sua hegemonia ate no proprio 
mercado interno,e em areas nas quais se 
consideravam praticamente imbati'veis. 
O desafiante e um longinquo pais orien- 
tal, arrasado e ocupado ao te'rmino da 
Segunda Guerra Mundial e que, em fins 
da decada de 50, tinha a fama de fabri- 
car produtos baratos e de ma qualidade. 
Perplexos, todos se perguntam: como is- 
to aconteceu? 

Industrias estrategicas 

Oatual desenvolvimento japones 
nao e fruto do acaso. Pelo con- 
trario, e' resultado de um es- 
forfo planejado e dirigido que 
ja dura mais de 100 anos. De fato, a de- 
monstracao de for9a do Comodoro Per- 
ry serviu para reforcar entre os niponi- 
cos o sentimento da necessidade de de- 



senvolver industrias estrategicas, tanto 
do ponto de vista militar como do co- 
mercio internacional. Lancaram-se, en- 
t5o os japoneses, sob a lideranca da oli- 
garquia Meiji, nesse esforgo de moderni- 
za95o e expansao com inusitada agressi- 
vidade, o que levou o pais a envolver-«e 
numa se'rie de conflitos comerciais e 
militares (China, 1895; Russia, 1905; 
Coreia e Taiwan, 1911; Mandchuria, 
1931) que culminaram em 1945 com 
os horrores da devastac2o nuclear de 
Hiroshima e Nagasaki. 

A derrota de 1945, porem, pode ser 
considerada em muitos aspectos como 
uma vitoria. - A imposicao americana 
de desarmamento poupou a na?3o imen- 
sos gastos com forcas armadas, permitin- 
do-lhe investir toda a sua energia huma- 
na, te'cnica e financeira no desenvolvi- 
mento economico e social. Para se ter 
uma ide'ia, o Japao gasta hoje somente 
2% do seu or?amento de pesquisa e de- 
senvolvimento com experiencias milita- 
res, contra os 50% gastos pelo EUA. Isso 
faz com que as verbas destinadas a pes- 
quisa civil quase se igualem em ambos 
os paises. 

OMITI 

Quando se fala em polftica in- 
dustrial japonesa, o primeiro 
nome que nos vem a mente e o 
do ja hoje legendario MITI - 
Ministe'rio do Come'rcio Internacional e 
da Industria. Suas origens remontam ao 
antigo Ministe'rio da Agricultura e Co- 
me'rcio que, em 1925, dividiu-se, ense- 
jando a criaijao do Ministe'rio da Indiis- 
tria e Comercio. Este, por sua vez, rece- 
beu durante a Segunda Guerra Mundial 
a denomina?ao de Ministe'rio das Muni- 
$oes, o qual veio a formar, apos o con- 
flito.oatualMITI. 

Por ocasiao da crise de 1929, que 
ocasionou uma grande turbulencia na 
economia internacional, caracterizada 
sobretudo porum crescente protecionis- 
mo, puseram-se os funciona"rios do ex- 



tinto MIC a estudar a situacSo interna e 
externa em busca de solucfies para con- 
tomar as dificuldades, sem, contudo, 
arrogarem para si o monopolio da opi- 
ni3o. Pelo contrario, muito contribuiu 
para a construct de uma polftica in- 
dustrial a participacSo do Conselho Deli- 
berative de Come'rcio e Industria, insti- 
tuido pelo MIC e composto por todas as 
forcas representativas da sociedade. 

Dentre os funcionarios. do MlC.des- 
tacou-se o trabalho de Yoshino Shinji. 
Apos estudar os modelos de racionaliza- 
9S0 industrial praticados em diversos 
paises, Shinji defendeu o adotado na 
Alemanha por ser este "voltado para a 
inova?ao tecnologica nas industrias, para 
a instalacao das mais atualizadas ma'qui- 
nas e equipamentos e para a eficiencia 
crescente e generalizada". No piano in- 
terne Shinji alertou para os riscos da 
concorrencia desenfreada, afirmando 
que ela deveria ser substituida pela co- 
operacao e que o proposito das ativida- 
des empresariais deveria ser a redu?ao 
dos custos, n3o o aumento dos lucros. 
Dentro desse pensamento defendia 
Shinji a necessidade de um abrangente 
piano de desenvolvimento o qual, por 
sua vez, pressupunha uma certa dose de 
controle do Estado sobre as atividades 
da iniciativa privada. 

Setores prioritarios 

Foi esse o modelo adotado pelo 
Japao para tornar-se competi- 
tive no mercado internacional: 
tornar os negocios mais produ- 
tivos, conferindo aos seus produtos e 
servicos maior valor agregado (isto e', 
maior contetido tecnologico). Para me- 
lhor perseguir esse objetivo, o MITI se- 
lecionou alguns segmentos — inicialmen- 
te, industria pesada e petroquimica; 
apos o choque do petroleo nos anos 70, 
informatica e telecomunica95es — como 
prioritarios, direcionando-os atraves de 
uma se'rie de incentivos e restricCes, ma- 
nejados de acordo com a situacao espe- 



Conhecido mais pelo seu passado que pelo presente, o Japao mostra hoje, a 
um mundo perplexo, que ja viv'e no futuro. Num impressionante exemplo 
de esforgo e cooperagao nacionais, este pequeno pais, pobre em recursos 

da natureza, mas de 
vigorosa cultura, 
prepara-se para ingressar 
no seculo 21 na 
vanguarda mundial do 
avango industrial 
e tecnologico. 




Com rapidez e precisdo inigualdveis, o robo da NEC insere chips em placas de circuito. 



cifica a ser atingida. Dessa forma, alguns 
setores s3o protegidos por mecanismos 
tais como a imposicao de tarifas e con- 
soles sobre as importac5es;taxas prefe- 
renciais; controles sobre o intercambio 
com o exterior e limitafOes aos investi- 
mentos estrangeiros nesses ramos de ati- 
vidade; subsidios; empre'stimos a juros 
reduzidos e auxflio financeiro para pes- 
quisa e desenvolvimento, alem de se be- 
neficiarem com condi?oes especiais de 
deprecia9ao e de licenciamento de tec- 
nologia estrangeira. Ja no direcionamen- 
to da industria como um todo, o gover- 
no fornece e cancelaautoriza$Ses(aqui, 
no caso da empresas que nao sigam suas 
diretrizes), recompensando as que co- 
peram mediante a liberacao de fundos 
governamentais. Entretanto.o MITI nao 
tern como interferir nos negocios inter- 
nos das empresas privadas. Ele pode in- 
centivar ou desestimular certas partici- 
pa9Ses; obrigar, nunca! 

O que acontece e que muitas empre- 
sas — farejando lucros nos promissores 
segmentos apontados pelo MITI - poem 
de lado suas diferencas e embarcam, jun- 
tos, nos projetos especiais. 



Projetos nacionais 



Para tornar-se uma sociedade to- 
talmente informatizada na vira- 
da do seculo, o Jap3o vem de- 
senvolvendo uma se'rie de gran- 
des projetos nacionais ligados direta ou 
indiretamente as tecnologias de informa- 
tica ou telecomunicacOes. Vejamos os 
principais. 

Opto-eletronica - patrocinado pelo 
MITI e realizado no centra de pesquisas 
da Fujitsu, em Kawasaki, com a partici- 
pacao de cinco outras empresas, o pro- 
jeto envolve investimentos de USS 110 
milhoes e visa desenvolver tecnologia de 
fibras oticas e dos dispositivos opto-ele- 
tronicos a elas relacionados. 

PIPS (Pattern Information Processing 
System) - nascido em resposta as difi- 
culdades causadas pela complexa lingua 
japonesa para a entrada de dados, este 
projeto conjunto da industria japonesa 
tern por finalidade aperfeicoar um siste- 
ma capaz de reconhecer imagens em ge- 
ral, substituindo a entrada de dados via 
teclado. 

INS (Information Network System) 



- este e o mais ambicioso projeto japo- 
nes. Conduzido pela Nippon Telegraph 
and Telephone Corporation e envolven- 
do investimentos da ordem de USS 120 
bilhoes a serem gastos em 15 anos, o 
projeto visa criar uma rede nacional de 
informacoes que - mediante o uso de 
fibras oticas, transmissao digitalizada, 
dispositivos de reconhecimento e sinte- 
tiza?ao de voz, terminals de video, tec- 
nologia de fac -simile e sate'lites de co- 
municacao - interligue todos os lares e 
empresas do pais com servos de telefo- 
nia, transmissSo de dados, textos, ima- 
gens fixas e moveis (TV, fac -simile) etc. 

Supercomputadores - orcado em 
US J 300 milhoes, visa pesquisar novos 
dispositivos eletronicos de alta veloci- 
dade (tecnologias de arsenieto de galio, 
jungoes Josephson e supeHattice) para 
produzir maquinas como o NEC SX-2, 
que executa 1 GFLOPS (bilhSes de ope- 
ra9oes de ponto flutuante por segundo). 

Sistema Captain (Character and 
Pattern Telephone Access Information 
Network System) - vers3o japonesa do 
videotexto, entrou em opera93o em no- 
vembro de 1984. Em junho de 1985 
tinha 7.240 terminals usua'rios em todo 
o pais, sendo 1 1 ,5% residenciais e 88,5% 
institucionais (governo e empresas). Ser- 
vi9os oferecidos: informacoes em geral 
sobre lazer, $eiVi$os piiblicos, tempo e 
noticias; intercambio de informa9Ses 
em grupos fechados; telecompras, reser- 
vas de passagens, participa93o em enque- 
tes, solicita9ao de folhetos e catalogos; 
conex3o com outros computadores; pe- 
quenos ca'lculos, como, por exemplo, 
um or9amento familiar; fomecimento 
de software. 

VAN (Value-Added Network) - basi- 
camente definida como uma rede de co- 
munica93o por pacotes com va'rias fun- 
9oes de servi9o adicionais, a rede VAN 
aplica-se no Jap3o a todas as fases de 
comunica95es, processamento de comu- 
nica95es, processamento de informa- 
9oes, multi-media (caracteres, audio, 
graficos e figuras). Operada por 6rg3os m 
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do governo e firmas particulars (cerca 
de 120, com aproximadamente 100 cir- 
cuitos proprios), tern como usuarios es- 
sencialmente empresas (comercio, 65%; 
transportes, 15%;Finan9as, 10%;outras, 
10%). Dentre os servicos oferecidos 
constam: encomendas de produtos e avi- 
sos de pagamento; compras, servifos 
bancarios e reservas via computador; 
acesso a bancos de dados; teleprocessa- 
mento. 

CATV (televisao por cabo) — o pri- 
meiro servigo foi instalado nos idos de 
1955, na cidade de Ikaho. Hoje operam 
38 mil estacSes (a maioria de pequeno 
porte), servindo a 4 milhSes 270 mil 
assinantes. Inicialmente destinada a su- 
prir as regiSes de recep?ao difi'cil — coi- 
sa muito comum no acidentado territo- 
rio japones — , tern recebido incentivos 
do governo (meios de transmissSo, pro- 
ducilo de programas, problemas de 
copyright etc.), devendo ganhar em bre- 
ve grande impulso com o desenvolvi- 
mento de novos satelites de comunica- 
980 e da capacidade de transmissSo bi- 
direcional, que acrescentara a vantagem 
de fazer compras e pagamentos alem de 
participar de aulas e outras formas de 
contato comunitario sem sair de casa. 

Satelites de radiodifusao — ao con- 
trario dos satelites de comunicac2o,que 
requerem centros de recepcao e poste- 
rior transmissao a ni'vel local, os de ra- 
diodifusao transmitem diretamente para 
as antenas domesticas de recepcSo de 
TV. Por operarem em faixas muito altas 
(12,5 a 17,5 GHz), permitem prestar 
uma serie de novos servicos antes impos- 
si'veis nas transmissSes realizadas nas 
bandas mais estreitas de VHF e UHF: 
transmissSo digital, em vez de analogica; 
TV de alta resolu?ao; teleconferencias; 
e mais: dados, software, caracteres, fac- 
simile etc. 

Teletext — espe'cie de videotexto, so 
que transmitido por emissoras de TV. 
Oferece, entre outras opcOes, noti'cias, 
cotacocs, informafOes sobre eventos em 
geral e publicidade. 

Programa espacial - inclui satelites 
(de comunicacOes, radiodifusao e explo- 
ra?ao cosmica), foguetes langadores e 
toda a tecnologia necessaria a essa ativi- 
dade. 

Tecn6polis - mistos de centros de 
pesquisas avancadas e polos industrials 
de alta tecnologia, essas cidades cienti'fi- 
cas foram projetadas para atenderem a 
uma dupla finalidade: constituirem-se 
em centros geradores de novas tecnicas, 
ao mesmo tempo em que criam novos 
polos de desenvolvimento no interior, 
aliviando a pressao populacional sobre 
as grandes cidades. Em niimero de dois 
ou tres (fora a cidade de Tsukuba, a 
primeira a se beneficiar desse novo con- 
ceito), as Tecnopolis dispor5o de todas 
as facilidades de informatica e telecomu- 
nicacoes em implantacao no pais. 



Teletopias — verdadeiras vitrines de 
como sera o Japao no seculo vindouro, 
ir3o constituir-se em 10 cidades-modelo 
totalmente informatizadas, onde lares, 
empresas, hospitals e reparticoes piibli- 
cas, recheados com os mais sofisticados 
equipamentos eletronicos, serao interli- 
gados entre si (rede INS) e com o resto 
do pais (redes Captain e VAN), permi- 
tindo aos seus moradores, entre outras 
coisas, fazer compras e utilizar servicos 
bancarios sem sairem de casa (onde seus 
filhos tambem receberao treinamento 
escolar), alem de terem acesso as infor- 
magoes estocadas em gigantescos bancos 
de dados a nfvel nacional. As empresas, 
por sua vez, utilizarSo os novos meios 
para fazer negocios, transmitir e receber 




No lar do futuro, um sistema integrado de 
informacoes e controle ambiental. 



dados e graficos, fazer videoconferen- 
cias, alem de disporem de informacoes 
que lhes ajudarao a gerir os seus assun- 
tos com maior produtividade e eficien- 
cia. 

Esses sao apenas os projetos de muito 
grande porte. Fora eles, ha uma varieda- 
de de outras iniciativas isoladas ou con- 
juntas levadas a efeito por empresas ou 
laboratories do governo nas areas de se- 
micondutores, novos dispositivos eletro- 
nicos para computadores e equipamen- 
tos de telecomunicacoes, robotica etc. 

O computador de 5. a geracao 

Destaque especial merecem os es- 
forcos para construir o compu- 
tador de quinta geracao, talvez 
o mais arrojado e ambicioso 
dos projetos japoneses. Iniciado em abril 
de 1982 e com duracao prevista de dez 
anos, e conduzido pelo ICOT —Institu- 
te of New Generation Computer Tech- 
nology, especialmente criado para esse 
fim, alem de contar com a colaboracao 
de diversos laboratories governamentais 
e dos oito maiores grupos empresariais 
japoneses com interesse no setor: Fu- 
jitsu, Hitachi, NEC Corporation, Mitsu- 
bishi, Matsushita, Oki, Sharp e Toshiba. 



Quanto aos recursos envolvidos, o go- 
verno colocara USS 450 milhSes, inves- 
timento esse que devera ser igualado ou 
ultrapassado pela indiistria. Na parte de 
recursos humanos, o projeto conta com 
a nata dos pesquisadores do pais. 

Ao contrario dos computadores 
atuais, que processam apenas uma ins- 
truc3o de cada vez e sao voltados basica- 
mente para a computacao de niimeros, 
as maquinas de quinta gera?3o poderao 
processar varias instrugSes ao mesmo 
tempo (o que ocasionara um aumento 
drastico na velocidade de execucao) e 
ser3o essencialmente destinadas ao pro- 
cessamento de dados nao-numericos, 
tais como a fala, graficos e imagens. 

As principals tecnologias envolvidas 
s3o a arquitetura de circuitos VLSI 
(que, alem da grande capacidade de pro- 
cessamento e memoria, ja englobarSo no 
hardware uma grande parcela de "inteli- 
gencia"), processamento paralelo, pro- 
gramacSo logica, bases de conhecimen- 
tos centradas em bancos de dados rela- 
cionais, inteligencia artificial e processa- 
mento de imagens. 

Projeto ainda hoje considerado por 
muitos cn'ticos ocidentais como invi3- 
vel, dadas as formida'veis dificuldades 
tecnicas que envolve, o computador de 
quinta geracao consiste em tres subsiste- 
mas integrados de hardware e software: 
1) Sistema de inferencia e de resolucSo 
de problemas; 2) Sistema de gerencia- 
mento da base de conhecimentos; 3) In- 
terface inteligente. 

A interface inteligente possibilitara a 
comunicacao homem-maquina (e vice- 
versa) atraves de linguagem natural e 
graficos ou imagens, bem como a inte- 
racSo com os demais computadores de 
quinta ou outras geracSes. Atraves do 
sistema de inferencia e resolucSo de pro- 
blemas, o computador podera responder 
a solicitagoes — mesmo que colocadas 
de maneira pouco precisa — e, a partir 
dai, com base na vasta quantidade de 
informac5es armazenadas nos seus pro- 
prios bancos ou nos de outros computa- 
dores, emitir jui'zos sobre os assuntos 
em discussao. Ja no gerenciamento da 
base de conhecimentos, o sistema de 
quinta geracSo conseguira compreender 
o conteiido das informagOes' nele arma- 
zenadas, alem de guard3-las, recupera-las 
e transferi-las para outros computadores 
nos quais, por sua vez, ira procurar as 
informacOes de que n3o dispuser em 
seus proprios bancos. E tambe'm nesse 
subsistema que estar3o localizadas as 
funcoes de auto-aprendizado, denomina- 
das de aquisicSo semi-automatizada de 
conhecimento. 

Para fazer tudo isso, serf preciso mui- 
ta potencia e tecnologia. De fato.os nii- 
meros envolvidos no desempenho dessas 
maquinas s3o imensos, se comparados 
com os padr5es atuais. A maquina de 
inferencia, por exemplo, devera ser ca- 
paz de realizar ate 1 CLIPS (um bilhao 




memoria ROM passou de 32 Kb para 48 
Kb, ocorrendo o mesmo com o RAM: 
64 Kb, standard. 
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Na foto, uma fdbrica de placas de circuitos para televisao totalmente automatizada. 



de inferencias logicas por segundo, sen- 
do que 1 LIP corresponde a entre 100 e 
1000 instru?5es dos sistemas convencio- 
nais por segundo). Na base de conheci- 
mentos, o computador tera que locali- 
zar e retirar, em quest3o de segundos, 
uma dentre ate 1000 Gigabytes (um 
trilhSo de bytes) de informacOes arma- 
zenadas. E a interface inteligente sera 
projetada para reconhecer — com um 
indice de 95% de acerto — um vocabu- 
lario de ate 50 mil palavras e armazenar 
ate 10 mil graficos ou imagens. Tais fa- 
canhas estarSo a cargo de um sofistica- 
di'ssimo software baseado em linguagens 
de inteligencia artificial, como o Prolog, 
e circuitos VLSI de alti'ssimadensidade, 
minusculos gigantes que reiinem ate' 10 
milhSes de componentes numa unica 
pastilha. 

O padrao MSX 

Os microcomputadores, conheci- 
dos como micom, somente ga- 
nharam popularidade no Jap3o 
de pouco mais de dois anos pa- 
ra ca. O atraso, porem, foi compensado 
por um vertiginoso crescimento do mer- 
cado. Ja em meados de 1984, o Clube 
de Microcomputadores do Japao tinha 
10 mil associados, um centra de compu- 
tacao em Toquio e 28 filiais espalhadas 
pelo pais. Tambe'm nessa epoca, havia, 
pelo menos uns 30 modelos de micros 
de variados portes, todos com uma di- 
versidade de perifericos. E tambem aqui 
o Jap3o inovava com o padrSo MSX. 

Fruto de um projeto conjunto entre 
a Microsoft (EUA) e a ASCII (japonesa), 
o MSX alcan$ou desde o seu lancamen- 
to, em maio de 1983, grande sucesso no 
Jap3o. No exterior, entretanto, a recep- 
tividade foi bem modesta, sobretudo 
nos EUA, pois haviam muitas diividas 
sobre o acerto do novo padr3o e suas 
possibilidades de se impor no mercado 
internacional, ja amplamente dominado 
pelas maquinas americanas. 

Dentre as restricoes apresentadas nes- 
se primeiro momento figuravam o uso 
de cartuchos (que, por seu alto custo, 
desestimulariam os produtores de soft- 
ware), diferen?as nos tipos de conecto- 
res entre as diversas marcas (o que res- 



tringiria a compatibilidade) e a enfase 
em jogos. 

Ja os defensores do MSX enfatizavam 
que por serem os fabricantes desses apa- 
relhos tambem consagrados produtores 
de video e audio, tinham condicOes de 
— ao contrario das empresas tradicionais 
de computadores — fornecer toda uma 
gama de perifericos (como o que permi- 
te o uso interativo de videodisco) capa- 
zes de extender as fronteiras de uso des- 
sas maquinas. Quanto ao software em 
cartuchos, argumentavam serem esses 
mais seguros contra a pirataria (bom pa- 
ra as software-houses) e lembravam que 
o MSX tambe'm poderia usar disquetes. 
Para completar, sustentavam que o novo 
padrao seria em breve bastante conheci- 
do e utilizado porquanto quern apren- 
desse a lidar com um modelo , estaria au- 
tomaticamente apto a operar todos os 
demais. 

Nessa polemica, ainda e cedo para 
apontar, com absoluta seguran9a, quern 
saira vencedor. Nao obstante, a penetra- 
93o que o MSX vem alcan9ando, no Ja- 
pao e na Europa, sugere prognosticos 
bastante otimistas para o exito dessa no- 
va familia de computadores. Em pouco 
mais de dois anos, ji foram vendidos 
mais de um milhSo de aparelhos em to- 
do o mundo e o equipamento ja entrou 
em sua segunda gera93o - o MSX 2.0. - 
que traz uma serie de inovacOes sem al- 
terar, contudo, a compatibilidade. 

Gra9as ao novo chip de video, a tela 
de 80 colunas agora e standard. O niime- 
ro de modos graficos passou de quatro 
para 10; a resolu93o maxima, de 256 x 
192 para 512 x 424 pontos; o total de 
cores disponi'veis de 16 para 256; e o nii- 
mero de sprites de quatro para oito. O 
novo chip tambe'm tern interface para si- 
nais externos de vi'deo e disp8e de am- 
plos recursos de edi93o de imagem. A 
memoria independente de video cresceu 
de 16 Kb para 128Kb. 

Na area de som, podera o usuario, 
opcional'mente, dispor de um novo chip 
que amplia dos atuais tres para nove o 
niimero de canais de audio, permitin- 
do obter musica em total polifonia, 
alem de um sem-niimero de efeitos so- 
noros. E para acomodar o novo BASIC, 
mais poderoso, com novos comandos, a 



Ograu de coordena93o com que 
este pais se movimenta em di- 
re93o a objetivos definidos ja 
lhe valeu, por parte dos estupe- 
fatos cn'ticos ocidentais, a denomina93o 
de Japan Inc. De fato, as causas do de- 
senvolvimento japones escapam a todos 
os padroes conhecidos no ocidente e so 
podem ser devidamente compreendidas 
quando examinadas a luz da evolu93o 
historica e das condi90es peculiares que 
cercam a realidade japonesa. 

Tendo que abrigar uma popula93o su- 
perior a brasileira (hoje por volta dos 
128 milhSes de habitantes) num territo- 
rio bastante reduzido (3 1 7 mil 708 Km 2 , 
ou seja, pouco menos que os estados de 
Mato Grosso do Sul e Alagoas reunidos), 
acidentado (um arquipelago com quatro 
ilhas principals e mais de tres mil ilhas 
menores, sendo que quatro quintos da 
superficie s3o formados por colinas e 
montanhas, muitas delas vulcSes extin- 
tos ou em atividade), com poucas terras 
araveis e aguda carencia de recursos na- 
turais, o Jap3o sempre teve no trabalho 
coeso e harmonico do seu povo a base 
de sua sobrevivencia, o que contribuiu 
para solidificar o rigido esquema hierdr- 
quico que ate hoje predomina. 

Assim como os samurais dedicavam 
suas existencias ao servi9o para um se- 
nhor, tambe'm o trabalhador moderno 
confia sua vida profissional (e, em gran- 
de parte, seus assuntos pessoais) a uma 
empresa, a qual serviri com o melhor 
dos seus conhecimentos e esfor90S ate 
o momento da aposentadoria. Em retri- 
bui9ao, sera orientado, protegido, ouvi- 
do e respeitado, recebendo ainda uma 
serie de benefi'cios materials que in- 
cluem participa93o nos lucros propor- 
cional a produtividade alcan9ada pela 
empresa. Em tal sistema de re^Oes, a 
troca de emprego movida pelo interesse 
pessoal e' considerada uma trai93o pela 
empresa e uma loucura pelos familia- 
res e amigos. Alem disso, como e de cos- 
tume todos ingressarem nas enpresas nos 
cargos mais baixos, para irem ascenden- 
do gradativamente, e muito difi'cil ir 
para outra firma com o mesmo cargo e 
salario do emprego anterior. 

A empresa, o trabalho, constituem o 
centra da vida individual e a fonte da 
realiza9ao pessoal, com a preocupa93o 
de trabalhar em determinada empresa os 
jovens japoneses enfrentam, anos a fio, 
o rigorosissimo sistema educacional do 
pais. 

Desde que ingressa na empresa, esta- 
belece-se logo um relacionamento muito 
estreito entre o indivi'duo e a organiza- 
9ao. De fato, em todos os niveis o fun- 
cionario e chamado a participar com sua t*r\ 
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A SB/DADOS coloca a disposigao de 
executivos e profissionais em geral uma 
bateria de Aplicagoes desenvolvidas em 
Lotus 1.2.3 e DBase/Ill especificamente 
para areas administrativas e financeiras, 
tais como: 

■fc Faturamento - Escala de Otimizacao - 

Folha de Pagamento 
■pControle de Estoque- Programacao de 

Producao 
■pcurva de Custos - Inventario Diario - 

Curva ABC de Estoque, etc. 



INSCRIQOES COM Sr. Carlos Raso - Pelo 
Tel.: 881-2227 



PROGRAMAQAO PARA 
MAIO E JUNHO 



TREINAMENTO PASSO A 
PASSO 

• Trabalhando com DBase/ll 
12a16/maio - 02 a 06/junho - 20h 

• Desenvolvendo com DBase/Ill 
05a09/maio - 16a20/junho - 20h 

• Redigindo com Wordstar 

12 a 16/maio - 09 a 13/junho - 20h 

• Redigindo com Word 

26 a 28/maio - 02 a 06 junho - 20h 

• Integrando com Lotus 1.2.3 

05 a 09/maio - 02 a 06 junho - 20h 

• Como operar o Supercalc III 

05 a 09/maio - 16 a 20 junho - 20h 
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TREINAMENTO AVANCADO j 

• DBase/ll para Programadores 

12a06/maio - 09 a 13/junho - 24h 

• DBase/Ill para Analistas 

19a23/maio - 23 a 27 junho - 24h 

• Lotus 1.2.3 para Usuarios 
19a23maio - 09 a 13/junho - 20h 



JAPAO: O FUTURO CHEGOU 



FORNECEMOS: 

• Material didatico "Quik Reference" 

• 10 micros PC IBM 

• 1 telao 52" 

• Flip chart - lousa japonesa 

• Retro 

.^^^^■■^■^■^■^■^■^■^■^■^■^■^■^■^■^ 

FORMA DE PAGAMENTO: 

• 50% na matricula e 50% no 1." dia. 
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SISTEmAS DE BANCO DE DADOS 
R. Groenlandia. 1750 - J. Europa - CEP 01434 

Tel.: (011) 881-4599 

Sao Paulo- SP 



opinilo que, ao ser considerada, mesmo 
se nao plenamente acatada, faz o indi- 
vi'duo identificar-se com o grupo do 
qual participa. 

A atitude de consenso e que orienta 
o processo decisorio no Jap3o. Ensinado 
desde crianca a comportar-se de modo a 
n3o trazer vergonha e desgraca para si, 
sua famflia, empresa ou qualquer outro 
grupo ao qual venha a pertencer.o japo- 
nes aprende a considerar as opiniQes das 
outras pessoas, aceitando a posicSo pre- 
dominante. 

Os amigos s3o os colegas de trabalho 
e o chefe, um segundo pai. A relac3o 
chefe-subordinado e t3o forte que che- 
ga a extremos de haver casamentos ar- 
ranjados pelo proprio patr3o, para que o 
seu subordinado n5o se torne um soltei- 
riio. 

Esse fato evoca uma observacao so- 
bre a posic3o da mulher no Jap3o. O 
Jap3o e uma sociedade de homens na 



qual a mulher tern um papel bastante 
definido. fi ela a responsavel pela cria- 
cao dos filhos, pela gerencia do lar. O 
homem prove o sustento da famflia, e e 
dele que emanam todas as ordens. Ele 
tern sua vida particular, seus "amigos de 
sake" e um assunto predileto : o trabalho. 

Obstaculos futuros 

Um pais que n3o renega a tradi- 
cao, mas que a ela n3o se ape- 
ga. Ao contra'rio de outros po- 
vos os quais, fascinados por um 
glorioso passado, voltaram as costas para 
o futuro, congelando-se no tempo, o Ja- 
p3o tern a capacidade de respeitar costu- 
mes milenares ao mesmo tempo em que 
nutre profundo entusiasmo pela renova- 
c3o a cada dia, num esforco constante 
para antecipar o futuro. O gosto pela 
tecnologia e a busca do conhecimento 
s3o caracten'sticas do japones. 



A reagao americana 



£ intencdo declarada dos japoneses do- 
minarem o mercado mundial de information 
nos anos 90. Os americanos, vendo rompida 
sua hegemonia jd em diversos mercados, co- 
mo o de memdrias RAM, e tendo ainda viva 
na memdria a crise que balancara sua indds- 
tria automobiltstica em 1979-1980 ("Lem- 
bre-se de Detroit ", era o grito deguerra que 
ecoava em 1982 na area de informdtica), 
uniram-se, com o auxMo do governo, para 
fazer frente a nova ameaca. 

A Associacao da Industria de Semicon- 
dutores - SlA, que congrega produtores do 
Vale do Silfcio e outras regtSes, lancou-se 
num projeto cooperativo de pesquisa que 
envoi via gastos anuais de US$ 100 milhdes, 
enquanto trabalhos semelhantes se intensi- 
ficaram nos laboratdrios de diversos univer- 
suJades, empresas e centros de pesquisa. Em 
todos os casos, dois objetivos comuns: neu- 
tralizar a vantagem japonesa de baixo custo 
e aha qualidade e manter a dianteira mun- 
dial da inovacao tecnoldgica. 

No primeiro caso, havia que veneer uma 
tradicao que particulariza o prdprio proces- 
so de desenvolvimento tecnoldgico em am- 
bos os paises. Nos EUA, a tecnologia desen- 
volveu-se primordialmente em funcHo das 
necessidades de defesa, o que tomava o pro- 
blema do custo de importdncia secundaria. 
Jd no Japdo, o progresso tecnico, sobretudo 
em microeletronica, ocorreu em funcao da 
industria de eletrdnica de consumo, onde os 
fatores de baixo custo e elevada miniaturi- 
zacao eram mandatdrios. 

Seguindo o caminho trilhado pelos japo- 
neses, os americanos comecaram a esforcar- 
se para reduzir estoques, aumentar a quali- 
dade dos produtos e diminuir bs custos de 
producao, atem de investirem na modemi- 
zacdo de suas fdbricas. A IBM. por exemplo, 
entre 1979 e 1984, investiu USS 11 bilhdes 
em equipamentos e instalacdes industrials. 
Quanto ao esforco para manter a lideranca 
tecnoldgica, novamente a Gigante Azul fa la 
por seu pais: USS 13 bilhdes investidos em 
pesquisa e desenvolvimento no mesmo pe- 
rfodo. A industria em geral tambem passou 
a beneficiar-se de uma confianca maior dos 
investidores, recebendo a mais gorda fatia 
dos USS 10 bilhdes investidos no mercado 
como capital de risco entre 1979 e 1 984. 

Num pats que nao reluta em gastar di- 



nheiro quando o assunto em pauta e a segu- 
ranca nacional, o Departamento de Defesa 
tern lido um papel de destaque na condu- 
cdo dessa cruzada tecnoldgica. 

Recursos do Department of Defense, por 
exemplo, financiam USS 450 milhdes para 
o desenvolvimento da nova geracao desemi- 
condutores VHSIC - Circuito Integrado de 
Muito Aha Velocidade. Tambe'm com ver- 
bas da defesa, a industria americana procura 
descobrir novas tecnologias de fabricacao, 
atraves do projeto ICAM. Enquanto isso, a 
agenda de pesquisas do Departamento, a 
DARPA - Defense Advanced Research 
Projects Agency, investe USS 500 milhdes 
no desenvolvimento de supercomputadores e 
USS 100 milhdes na tecnologia de semicon- 
dutores d base de arsenieto de gdlio. E o po- 
lemico projeto "Guerra nas Estrelas", con- 
forme jd apontaram diversos analistas, nao 
visa tdo-somente neutralizar os mtsseis so- 
viet icos Id no espaco exterior, mas tambem 
a invasao dos computadores e outros produ- 
tos japoneses aqui na Terra. 

Tambem para incentivar a industria lo- 
cal, o Departamento de Defesa lanca mad de 
outra arma poderosa: o paquidermico poder 
de compra do govemo. Os gastos com a 
aquisicao de componentes eletrdnicos no 
mercado interna deverao aumentar dos 
USS 4,8 bilhdes de 1983 para USS 132 bi- 
lhdes em 1987. Com isso, muitos dos prin- 
cipals produtores americanos - como a Te- 
xas Instruments - jd devem mais da metade 
dos seus ganhos ds vendas para o govemo fe- 
deral. 

O Departamento de Defesa, no entanto, 
nao e o tinico orgao do govemo americano 
empenhado na guerra santa aos japoneses. O 
Departamento de Justica, jd em 1982, abriu 
processo contra as seis maiores empresas ni- 
pdnicas por prdticas predatdrias de precos 
no mercado de semicondutores. O Departa- 
mento de Comircio, por sua vez, vigia de 
perto os passos dos fomecedores japoneses 
de equipamentos de telecomunicacdes, com 
vistas a enquadrd-los nas leis anti-dumping. 
E o FBI monta seguidas armadilhas e caca 
implacavelmente os envolvidos em casos de 
espionagem industrial, o que jd rendeu re- 
centemente um rumoroso e humilhante pro- 
cesso contra a Hitachi, flagrada numa ten- 
tat iva de obter segredos da IBM. 




O Sistema de Teleconferencia da Fujitsu permite que seus funciondrios, de diversos pontos do 
pais, participem de uma reunido como se estivessem na mesma sala. 
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Jap3o -e,principalmente,T6quio 
— respira tecnologia. N5o so nas fre- 
quentadi'ssimas lojas do distrito de Aki- 
habara, onde se acha tudo de eletroni- 
ca, mas nos servicos publicos de trans- 
portes (como o trem automdtico, sem 
maquinista, ou o famoso trem-bala), co- 
municacOes (diversas redes, com uma va- 
riedade de servifos) e outros. Esse "espf- 
rito tecnologico" tambe'm esta presente 
nas portas do comercio (em sua maioria 
automaticas, muitas delas saudando os 
fregueses na entrada e na safda com 
uma voz feminina digitalizada), nos cai- 
xas automaticos dos bancos (em cujos 
vfdeos uma figura de mulher faz a tradi- 
tional curvatura de agradecimento), ou 
nos robos, sfmbolo de futuro e mascote 
dos anos 80, como o Ki-ku-zo, robozi- 
nho de USS 50 que pode ser treinado 
pela voz do dono para andar, pegar e de- 
positar pequenos objetos. 

Esse avanco tecnologico acelerado, 
essa busca de uma crescente qualidade e 
aperfeicoamento na"o s3o simples mani- 
festagao de vaidade ouambicao. Consti- 
tue-se, antes, numa questao de sobrevi- 
vencia nacional no seculo que em breve 
se inicia. Os japoneses sabem muito bem 
que — avaliadas suas carencias territo- 
rials e de recursos naturais — para per- 
manecerem competitivos no contexto 
mundial tern que ser extremamente pro- 
dutivos e competentes em todos os se- 
tores. 

Viabilizando o computador de quinta 
geraca"o, e tornando-o acessi'vel a amplos 
segmentos da sociedade (ao oferece4o, 
conforme planejado, em versSes de pe- 
queno porte e com a possibilidade de 
operar conectado a grandes redes de in- 
formac5es), estarao os japoneses dispon- 
do de um instrumento poderoso de evo- 
lugao social, economica e cultural, ins- 
trumento esse capaz de proportions 
novos ni'veis de eficiencia, mesmo em 
atividades onde o aumento dos indices 
de produtividade parecia jd esgotado, 
como e o caso das indiistrias primarias 
(como agriculture e pesca) e tercia'rias 
(servicos e administrac3o em geral). 
Tambem na area industrial, os produtos 
japoneses — projetados, fabricados e co- 
mercializados com o auxflio dessas no- 
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vas ferramentas - apresentar3o uma po- 
sic3o quase imbati'vel em termos de 
aperfeicoamento, qualidade e preco. 

No futuro do Jap3o, entretanto, nem 
tudo s3o rosas, restando ainda alguns 
problemas cruciais a solucionar. Um de- 
les refere-se a pesquisa de ciencia basica 
que tern sido seguidamente negligentia- 
da em favor da tecnologia aplicada. Ha- 
bituados a obter licenciamentos de pa- 
tentes e know-how dos paises ociden- 
tais, os japoneses comecam agora a ver 
barrado o seu acesso as descobertas mais 
recentes. 

Assim, para manter-se atualizado em 
areas como a aeroespacial, novos mate- 
rials, biotecnologia, ciencia da computa- 
cao e microeletronica, os japoneses es- 
t3o desenvolvendo uma serie de esfor£os 
que incluem o estabelecimento de cen- 
tros de pesquisas no exterior, o incenti- 
vo a pesquisa b3sica nas indiistrias, o au- 
mento da cooperacao entre a industria 
e a universidade e, nesta, procurando 
amenizar o n'gido sistema hierarquico 
que limita a atuaf3o dos cientistas mais 
jovens. 

No comercio international, o desafio 
e o crescente protecionismo dos paises 
desenvolvidos e a concorrencia dos no- 
vos paises industrializados, printipal- 
mente da Asia (Coreia do Sul, Formosa, 
Hong-Kong e Singapura) que, com cres- 
cente tecnologia e baixos saldrios, come- 
cam a amea$ar os produtos japoneses 
em muitos mercados. 

O JapSo, porem, ja provou em muitas 
ocasioes a sua capacidade de transfor- 
mar dificuldades em vantagens e n3o se- 
ra surpresa se essas nuvens que ora tur- 
vam o horizonte niponico venham a for- 
necer o estimulo a busca de solucQes 
que facam brilhar, como nunca, o sol 
nascente. 



• Agradecemos a colaboracao do Prof. Ant6- 
nio Costa, do. Dr. Newton Silva (IDORT), do 
Sr. Kiyoshi Onishi (JETRO-Rio) ede Luciana 
Teixeira da Cunha (Prodigito Processamento de 
Dados) que muito nos auxiliaram com os seus 
depoimentos e ponderacoes e com o forneci- 
mento de material atualizado sobre o Japa~o. 
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no RDDRSSS voce clevorci , 
qualquGf tipo de # •<■>> 

Exclusivo metodo de ensino 
WIDEOTGfO que 5e utilize da 
mais moderna tecnica VISUAL, 
o video-eassete. 

Edicdo microcomputarizada. 
Curso de BASIC TOTAL, e de 
APLICATIVOS apple V. 
TURMAS ESPECIAIS 
PARA EMPRESAS 

FACA SUA RESERVA JA PELOS 
TELEF0NES: 

Oil 211-5348 e Oil 212-0370 

RDDRESS 

Video 

Computer 

Connection 

ODDlt? m:, '' : " raaistrads uppIs tairputai 



Rua Natingui, 1199 

CEP 05543 - Sao Paulo - SP 

Alto dos Pinheiros 
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SUPRIMENTOS 
DE QUALIDADE 



Ap6s 5 anos em Sao Paulo 

agora tambem no 

Rio de Janeiro 

— Formularios continuos 

— Fitas para impressoras 

— Diskettes, mini diskettes 

— Etiquetas auto-adesivas 

— Arquivos para diskettes 

— Streamer 5, 7, 20 e 190 mb 

— Fitas magneticas 

— Pastas para formularios 

PRACPD 

Suprimentos para Processamento 
de Dados Ltda. 

Rio de Janeiro (021) 232-6179 

Sao Paulo (011) *263-6644 
Telex (011) 38045 PRACPD Br 



j 




Converter uma saida do modo serial para o paralelo ou 
duplicd-la e um recurso indispensdvel para quern deseja 
usar uma impressora paralela.Veja aqui esses acessorios: 
o conversor serial paralelo e o comutador de saida serial. 



Quantas vezes voce ja deve ter 
se queixado do seu micro 
TRS-Color por ele nab ter 
uma saida para impressora paralela? 
Muitas, temos certeza. Nos, pelo menos, 
sentimos muito esta fait a em nosso 
trabalho. dentro do CPD de MS, mas 
isto ja e passado, pois recebemos para 
analise em nosso centra de processa- 
mento um dos produtos da firma Micro 
Equipamentos, que resolve este proble- 
ma. conversor serial paralelo e um 
equipamento que convene o sinal de 
uma safda serial para um 




SOFTWARE PARA CP 400 E COMPATIVEIS 



APLICATIVOS: Processador de Textos 

PPTEXTO c/ acentuapao em portugues, Plani- 

Ihas Eletronicas, Bancos de Dados, Pacotes In- 

tegrados. 

UTILITARIOS: Editor/Assembler, Expansor 

de Tela, Supertec, Compiladores, Copiadores, 

Etc. 

GRAFICOS: DUMP P-500, Esquemas Eletroni- 

cos, Bjork Blocks, Comerciais, Graphicom e 

outros. 

LINGUAGENS: LOGO em portugues, PILOT 

para professores e uso didatico, PASCAL, 

CBasic. 

JOGOS: Muitos titulos para mencionar aqui I 

Nossos calalogos mostram as telas dos jogos. 

Temos jogos exclusivos. Escolha melhor na 

Peek & Poke I 



SOFTWARE PARA CP 500 / CP 300 



- Processador de textos PPTEXT 500 DISCO 
c/acentuaca"o. 

- Planilha Eletronica CALC-300. Unica em Z- 
80 para vers§o K-7. 

- Utilitarios copiadores para f ita e disco. 

- Editor/Assembler, monitor MACMON e tu- 
tor de linguagem de maquina. Em fita ou disco. 
Aprenda Z-80! 

- Compilador ZBasic. Produz codigo objeto 
comrapidez. 



SOFTWARE PARA LINHA MSX 



Revendemos cartuchos e fitas cl os melhores 
precos. Desenvo/vemos titulos proprios. Entre 
em contato. 



A PEEK & POKE demonstra, garante e da su- 
porte permanente a seus programas. Venha 
conhece-los ou solicite catilogo completo para 
o seu equipamento. 



PEEK & POKE Microcomputac^o e Comercto LIda 
Av Brig. Faria Lima. 1664 Con]. 1102 
01452 Sflo Paulo SP Fone:l011>8133277 



Conversor serial paralelo 



sinal paralelo (tal 
qual indica o no- 
me), e sua aplica- 
980 pode ser es- 
tendida a mo- 
dems, iin pressor as 
e outros periferi- 
cos alius. 

O equipamen- 
to recebido em 
nosso CPD foi 
testado com su- 
cesso em um mi- 
cro CP 400 co- 
nectado a uma 
impressora Gra- 
fix, e o unico in- 
conveniente que 
apresentou foi a 
necessidade de 
mexer em um dos 
dip switch da im- 
pressora, pois o 
CP 400 mandava 
todas as linhas 
de texto impres- 
sas acompanhadas de um line feed, o 
que causava espacejamento duplo entre 
as linhas. Esta necessidade, porem.surgiu 
porque em nosso centra usamos a im- 
pressora em diversos equipamentos, e 
cada qual utiliza uma configurac9o dife- 
rente de impressab; a chave que regula 
o line feed na Grafix e a de niimero 5 do 
dipl. 

Nos testes efetuados, o periferico re- 
velou-se bastante eficaz, pois imprimiu 
listagens, textos e graficos em alta-reso- 
IU950 sem apresentar falhas, demons- 
trando ainda ser um equipamento indis- 
pensdvel aos usuarios de micros com 
saida serial e que utilizam impressoras, 
permitindo liberdade de uso tanto de 
impressoras paralelas quanto seriais. 

O conversor e comercializado acondi- 
cionado em embalagem lacrada conten- 
do uma fonte de 9 V para a aliment^ab 
do mesmo e um folheto com as instru- 
95es de uso que sab bem simples. Para 
a conversab, o equipamento possui ajus- 




Nome: Conversor serial /parale- 


trdnicos Ltda. 


lo 


Endereco: Rua Pedro Tetxei- 


Comutador de saida serial 


ras,13 


Linha: Diversos, desde que 


CEP 04550 - Sao Paulo-SP 


possuam saida serial 


Tetefone: (Oil) 533-2326 


Fabricante: Micro Equipamen- 


Pnco: Conversor CzS 2.100,00 


tos Produtos & Pro/. Ele- 


Comutador CzS 290,00 



te de velocidade entre 300 e 9600 
bauds, e ja vem com os cabos de ligagab 
entre o micro e a impressora, possuindo 
ainda uma segunda saida serial que per- 
mite, por chavelamento, ligar o micro 
diretamente a outro periferico sem ne- 
cessidade de desligar os cabos. 

Alem do conversor, a Micro Equipa- 
mentos fabrica diversos outros produtos 
de hardware e software, sendo que um 
deles e bem semelhante ao comversor. 
Trata-se de um comutador de saida se- 
rial que permite a duplicaeao da saida 
serial de um micro por chaveamento, 
posssibilitando ligar o equipamento a di- 
versos perifericos sem necessidade de fi- 
car trocando cabos. Ambos os produtos 
podem ser encontrados no Rio de Janei- 
ro, na Mikro's que fica na Rua do Cate- 
te, 311, lojas 1 18 e 1 19 (Infoshopping); 
em S3o Paulo, nas lojas Cinotica, Fil- 
cres, City Micros e Claritron ou direta- 
mente atraves do fabricante. Analise 
feita por Drvino C. R. Leitab. 

MICRO SISTEMAS, junho/86 



INFORMflTICfl 

os segredos do software e hardware, agora ao seu alcance! 

PROORRrVte O S€U PUTURO, SOrt SRIR DC CHSfl, COM OS CUASOS D€ INFOfiMfffKfl DO OCGD€NTfiL SCHOOLS 



PROGRAMACAO BASIC - Qnde voce aprende a 
linguagem para a clahoracSo dos scus proprios programas. 
a nivel pessoal ou proftssional! Software dc base ensinado 
cm lieAe*, objetivas e praticas. 



2 — PROGRAMACAO COBOL - A verdadeira lingua- 
gem professional, iargatnerue utilizada no Comcrcio. 
Industrie inslituicdes financeiras c grande numere. de 
outras aiividadcs! 




i — ANALISE DE SISTEMAS - Toda a tccnica da uii- 
[i/.ucio dos computadoics na solucao c dctcci^io dc 
problcmas empresariais. Um dos ma is promissores 
campoi da INFOKMATICA. 




4 — MICROPROCESSADORES - O hardware cm scus 
as pectus Eccnicos c praiicos, Projcto c manutencao dc 
microcomputadorcs, ensinados desde a Eletronica Basica, 
ate" a Eletronica Digital, aplicadas aos niais avaru^ados 
sistemas de microprocessamenio. 

OCCIDENTAL SCHOOLS 

cursos tectiicos especializados 

Al. Ribeiro da Silva, 700 CEP 01217 SAo Paul* SP 
Telefane: (Oil) £26-2700 
A 



OCCIDENTAL SCHOOLS 
CAIXA POSTAL 30.663 
01051 SAO PAULO SP 



SO 7 



Sim. desejo loccbor. rjrntiiitnmi-ntn. o eoiAlago ilustrado do curso da 

D anahse tie sistemas 
O nucroprocessadores 



D programacao BASIC 
Lj programacSo COBOL 



EmiIi-icco 



GRATIS 



Sol/cite cat a logo 
i lustra do sem 
comprom/sso ! 




Cidndfi 



Eatada. 



ESTA 

, UNIAO 

DAOTIMOS 

FRUTOS 



O CS 1 000AP da Cecus e o seu micro formam o principio basico da 
Rcdc Local Cctus. O CS 1 000AP c a Placa Basic.i de Comuoka<;io 
para micros de 8 bits compativeis com App!e. Para formar a rede, cada 
micro, com a placa. e inic-Migado a discos Winchc-sicr. imprcssoras 
e oiiiros recursosdisponiveis. Os seus micros compartilhamos 
rc-cursos. (ormando urn sistcma de grande pocencfal com urn pequeno 
mvcstimento. 

A sua Rede Local Ceuis podc scr formada por ate 255 
equipamcntos. F pode ser ligada a RENPAC c a oucras redes locais. 
atraves dos Gateways. 

Possui tambem procctao de LOCK c UNLOCK para arquivos 
e registros. A welocidade de transmissaoede I MbpseoaJcancede 
2400m por cabo coaxial. Usando tambem a placa CS I OOOPC, voce 
forma redes mistas de 8 <c 1 6 bits. 

A Rede Local Cetus e o sistcma mais simples, eficaz e economico 
que existe.JunicoCS I OQQAPao&seus micros. Esta umaovaidar 
otimos frutos para a sua emprcsa. 




n«|»OBanlnntoa: Balo Horliomto: Sprpss InrcninliGa Lldn I el. (031 J 225-6939 Brasilia: how Compuladorcj Compete- ReprewllBCOeB LIda tel (061)274-D64&r272-2S90Camp«iaB.; Si- 
tus - Sislsnws e Compulaaoros; Tfll.{0192|5Z-8<JOT Golanlm HaiJo SlslsmaiCom. ftlleplos.doComp.Lhla.Tol (062) ?24- 1759 JoaO Po&soa.' Som Omparaonal LIda . Ti'Ho.83) 222- 1 360 
JuLf da Fora: Sntl.i Piocnssamonlo da Dados S/C LIda Tel. (03?) 2IZ-0075 Natal: Sic/na InfcHmAllcn Lida.Tol. (Q9-4J 22 1 -11 fi I Ftoclfo: Agam - AutOfnac-ao a StsleinHS LMu . Tel. (CU-1 1 
224-4.127 Salvador Supneornp - S-wximonto-s. Hades a ConwulBdorea LIda. 7*1. (071] 215-5735 Santa AndiA: Eraos Compuladoros a Sislemas LIda Tal. (01 1|4*c-S968i'440-077l Sao 
Paulo: EnlorPnwhiloaoSttlrjmasUda. Tol. (Oil] 540-8295 #G»»an InlormallcaLlda. lol.(OI1J 275-7677ffi77-*?77 • Tl - To-cnolaflia ln*wmaT'ioaS.A.T0I.COI1>28B-472O/2B9-3843 



Adicione ao Micro Bug este modulo operational e amplie, dessa 
forma, os recursos de seu microcomputador compativel com o ZX81. 



Disassembler 




. Marcos Saito . 



Com o objetivo de ampliar os 
comandos e as aplicac-Ses do 
ja" poderoso Micro Bug, desen- 
volvi um modulo operacional 
denominado Disassembler. 

Antes de apresentar os oito coman- 
dos do Disassembler, convencionemos: 
xxxx - initio do primeiro ou unico 
bloco de memoria; 

yyyy — fim do bloco iniciado por xxxx 
(o endere90 yyyy nao pertence ao bloco 
delimit;! do); 

zzzz — initio do segundo bloco de 
memoria; 

bb - byte qualquer; 
cc - um segundo 
byte qualquer (na 
ocorrencia deste, 
bb e cc devem es- 
tar em hexadeci- 
mal); 

eeee — endereco 
inicial. 

Os comandos o- 
ferecidos pelo Di- 
sassembler sao os 
seguintes: 
S xxxx yyyy bbec 

— substitui a ocor- 
rencia do byte bb 
por cc, dentro do 
bloco especificado, 
imprimindo os en- 
derecos onde hou- 
ve a transformacao. 
T eeee N/L texto 
N/L — insere o tex- 
to determinado, a 
partir de eeee; 
U xxxx yyyy zzzz 

— troca, entre si, o 
conteudo dos dois 
blocos de memoria; 

V xxxx yyyy zzzz 

— compara o con- 
teudo dos dois blo- 
cos de mem6ria, 
imprimindo os en- 



derecos que discordam; 
W xxxx yyyy — zera o bloco de memo- 
ria especificado; 

X xxxx yyyy bb - imprime na tela os 
enderecos do bloco que contenham o 
bytebb; 

Y xxxx yyyy bbec - pesquisa a ocorren- 
cia consecutiva dos bytes bb e cc; 
Z eeee — efetua o disassembler a partir 
do endereco eeee. 

OBS.: Nos comandos S, V, X, Y e Z, 
a tecla BREAK interrompe o processo, 
enquanto que as outras dao continuida- 
de a ele. 

O comando Z aceita as operacoes 



SHIFT S e SHIFT E para chavearem 
velocidade de execugao e base do en- 
dereco apresentado, respectivamente 
(valido tambem para os comandos V, 
X, Y e S). 

O Disassembler utiliza apenas 1536 
bytes, ou seja, 1 ,5 Kb, a partir do ende- 
reco 7200h, o que toma possivel mu- 
dar o RAMTOP, no caso de se necessitar 
de mais memoria para a area do progra- 
ms em BASIC. 

Marcos Saito cursa Engenharia Elitrica na Es- 
cola Politicnica da USP. Ele 6 autodidata em 
linguagem BASIC e desenvolve programas 
nos micros NEZ80O0 e TK90X. 
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bom o LOGCONT, MICRO SISTEMAS inaugura urn novo servigo: o MS 
Destaque. Atraves dele, MS colocara a disposigao dos seus leitores as materias de maior 
porte e alta qualidade que chegam a redagao e que nao encontram espago suficiente para 
serem veiculadas integralmente nas edigoes normals. 

projeto vai funcionar da seguinte forma: urn artigo sera publicado em MS Destaque 
contendo uma explicagao resumida da materia. Caso o leitor se interesse pelo mesmo 
recebera, mediante solicitagao, urn pacote composto do texto em copia xerox e o 
res/pectivo disquete ou fita cassete (conforme o caso). 

MICRO SISTEMAS aguarda de seus leitores, como sempre acontece quando urn novo 
servigo e langado, sugestoes e criticas que so servirao para que possamos aperfeigoar 
cada vez mais o nosso trabalho. 



Sistema de Contabilidade 
LOGCONT 



Em toda a historia da informatica, 
talvez nunca tenha existido um 
programa comercial t3o difundi- 
do quanto os sistemas contabeis. Isto se 
deve a v3rios fatores. Em primeiro lugar, 
a importancia destes sistemas como fon- 
te de informacOes ao administrador e 
tambem pela sua simplicidade de imple- 
menta?ao. Suas regras simples, precisas e 
matematicas permitem uma execu?ao 
eficiente sem grande esforco. 

No entanto, apos 40 anos de informa- 
tica, alguns sistemas contabeis se limi- 
tam a repetir de forma automatica o 
mesmo trabalho que e feito manualmen- 
te. Isto nlo so traz quedas na perfor- 
mance dos sistemas como tambem limi- 
ta a quantidade de informa?5es que ele 
poderia oferecer a empresa. 

Nesta edicSo, MICRO SISTEMAS 
oferece aos seus leitores um sistema 
contabil completo, o LOGCONT, em 
sua forma basica, com fontes e tudo 



mais que se tern direito. Neste artigo, 
vamos apresentar as caracten'sticas mais 
importantes do LOGCONT. Em primei- 
ro lugar, veremos o que o LOGCONT 
faz e que os outros tamb6m fazem: 

• Didrio — sem diivida, o menos infor- 
mativo de todos os relatorios contabeis. 
Inclui'do apenas por razOes legais. 

• Razao — muito util, principalmente 
no fechamento de contas com diferen- 
9a, oferecendo meios de seleciSo de con- 
tas e pen'odos a relatar. 

• Balancete — um relat6rio fundamen- 
tal para informacOes gerenciais. LO- 
GCONT oferece n3o somente um balan- 
cete, mas um relatorio flexivel que pode 
ser produzido em qualquer epoca, to- 
mando-se quaisquer limites de data, nao 
somente do ini'cio ao final do mes. 

• Saldos — saldos de contas sinteticas 
e anali'ticas facilmente selecionaveis 
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atraves das referencias ambiguas (veja a 
seguir). Fornece ainda o saldo a debito, 
a credito e total para cada conta. 

que o LOGCONT faz e que somente 
alguns fazem: 

• Totalmente On-Line - o LOGCONT 
dispensa fichas de lote e folhas de trans- 
crifao de dados, objetos da idade da pe- 
dra da informatica. Ele 6 um dos poucos 
totalmente on-line, sem, com isso, per- 
der a eficiencia, gracas a uma estrutura 
moderna e um modo de pesquisa sim- 
ples. 

• Praticamente ilimitado - o LOG- 
CONT s6 e limitado pela linguagem em 
que e implementado e pelo ambiente 
em que 6 executado. Mesmo assim, ele 
permite ate" 32767 lan$amentos em um 
disquete e outras 32767 contas no pia- 
no. As contas podem ter c6digos de ate" 
255 di'gitos com ate" 255 ni'veis. 



• Muito flexivel — a empresa que 
optar pelo LOGCONT nao precisara mo- 
dificar uma linha sequer de seu piano de 
contas. O LOGCONT se adaptara a ele. 
numero de di'gitos em cada ni'vel e li- 
vre ate 20. Podem existir c6digos de 
tamanhos diferentes em um mesmo ni'- 
vel e as contas podem ser inclui'das em 
qualquer ordem no piano. proprio sis- 
tema descobrira quais contas s3o sinte- 
ticas e quais s5o anali'ticas, sem interven- 
cao do usuario. 

que o LOGCONT faz e que nenhum 
outro faz: 

• Referencias ambiguas - uma referen- 
da ambi'gua € um meio simples e efi- 
ciente de selecionar contas para produ- 
zir relat6rios e outros processamentos. 
Gragas as referencias ambiguas, o LOG- 
CONT passa a incorporar caracterfsticas 
unicas, pois com algumas teclas o usud- 
rio pode selecionar exatamente as 
contas que ele deseja processar. 

• Facilidades para construir o piano — 
em orgaos piiblicos, o piano de contas 
costuma ser repetitivo, com algumas 
contas sinteticas copiando exatamente 
as subdivis5es da outra. Ele permite a 
construcao de pianos desse tipo em pou- 
cos minutos e praticamente isentos de 
erros, possibilitando tambem facilidades 
para listagem, correcilo e eliminacao de 
contas do piano. Todos estes recursos 
s3o acessiveis gracas as referencias am- 
biguas. 

O que o LOGCONT faz e que os outros 
provavelmente nunca farSo: 

• Fontes - nunca os fontes de um 
software deste porte foram oferecidos 
a um preco t3o baixo. £ uma oportuni- 
dade unica de possuir n3o somente um 
programa util, mas tambdm uma grande 
fonte de t^cnicas de programa93o. Alem 
disso, os fontes estSo escritos de forma 
estruturada e modular, com a descri95o 
completa de seu funcionamento interno 
(menos as rotinas de suporte), para que 
o usuario possa gerar seus proprios rela- 
t6rios. 

• Portabilidade — este software pode 
ser executado em uma grande variedade 



de micros nacionais: TRS-80, IBM-PC, 
MSX e todos os micros CP/M (inclusive 
Apple com placa CP/M). Talvez seja um 
dos softwares nacionais mais portateis. 
Esta portabilidade foi conseguida com o 
uso de um dialeto mais ou menos pa- 
dr3o do BASIC, BASIC-80 da Micro- 
soft. 

A ESTRUTURA 

LOGCONT e composto por apro- 
ximadamente 2000 linhas de c6digo- 
fonte divididas em 34 m6dulos. Estes 
m6dulos estate separados em quatro gru- 
pos: grupo de inicializa93o com um 
m6dulo, os menus com cinco m6dulos, 
os programas com 19 e as rotinas de 
suporte com nove m6dulos. A organiza- 
980 hierarquica destes m6dulos pode ser 
vista na figura 1 . 

O MANUAL 

O manual oferecido com o sistema 
esta" dividido em tres partes: 

Na primeira, temos o manual do 
usudrio, com uma descri93o completa de 
cada um dos 19 programas; na segunda, 
o manual de instala93o, descrevendo o 
processo de digfta9ao, compila93o e 
link-edi93o de cada modulo; e na ultima, 
o manual de implementa93o, detalhando 
a estrutura interna dos arquivos de da- 
dos. 



NOME: Sistema de Contabilidade 
LOGCONT 
LINGUAGEM: BASIC 
EQUIP AMENTO : TRS-80; CP/M 
PRE-REQUISITOS: 48 kb de RAM 
(mfnimo); 300 kb de membria em 
disco; impressora de 132 colunas. 
LIMITACOES: 32 mil contat; o codigo 
da conta de ate 255 dfgitos. ate 255 n(- 
veis no piano de conta; 32 mil lanca- 
mentos por disquete. 
PREQO: Manual do sistema (53 
paginas) - Cz$ 200,00; Listagem 
(63 paginas) - Cz$ 150,00; Sistema 
completo (manual, disquete e 
listagem) - Cz$ 700,00. 



Ivan Camilo da Cruz, constitute colaborador 
de MS, domina v&rias linguagens de programa- 
p3o, dentre elas BASIC, Pascal, FORTRAN, 
COBOL, PL/1 e Assembler. Tern ainda ex- 
periSncia em computadores grandes, minis e 
micros. Atualmente, participa da implantacao 
do CPD da Controles Grificos Dam, desenvol- 
vendo programas em linguagem C. 
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Antes de inscrever-se em qual- 
quer curso de informatica, conte 
ate" 10. Conhepa a escola, os rr\6- 
todos e equipamentos. Confira 
se o que voce vai aprender bate 
com o que voce realmente preci- 
sa. O SENAC-INFORMATICA 6 
a escola mais completa de Sao 
Paulo. Tern cursos praticos para 
quern quer aprender a operar, 
programar, conhecer linguagens, 
aplicativos, ou simplesmente, jo- 
gar com o micro. O SENAC-IN- 
FORMATICA esta oferecendo 
10 novos cursos nota 10 da linha 
Sinclair. Escolha o seu e venha 
tirar a prova dos 9. Voce vai con- 
cordar em numero, genero e 
grau! 

1. 

2. 
3. 
4. 

5. 

6. 

7. 
8. 

9. 
10. 



OperacaoTK90Xe 
IntroducSo ao Basic 
Sinclair 

Programaca*o 
Basic TK90X 

Assembler 2-80 

Assembler Z-80 
A van cad o 

Criacao e Programacao 
de Jogos no TK90X 

Criacao e Programacao 
de Aplicativos 
no TK 90X 

FORTH no TK90X 

PROLOG no TK 90X 

Aplicacdes Profissionais 
do TK90X 

Logo para Criancas 



INSCRICOESABERTAS. 
VAGAS LIMITADAS! 

Informacoes e Inscricoes: 

Rua Dr. Vila Nova, 228 
Tel.: (011) 255-0066 



senac 



informatica 




MICRO SISTEMAS analisa para seus leitores, neste numero, 

tres editores de texto simples e efwientes, para serem 

utilizados em microcomputadores pessoais. Eles sao o Comp- 

Texto (ZX8I), Multitext (ZX Spectrum) e o MSX-Word (MSX). 



Editores de texto 



zx spectrum zx spectrum zx spectrum zx spec 



Pregao 



Livio Roberto Brasil 



Na epoca de ouro dos micros ZX81, um 
programa que se destacava pela boa 
qualidade e recursos, apesai de nao per- 
mitir seu total aproveitamento devido as limi- 
tacSes do proprio micro, era o Tasswoid, cria- 
do pela empresa inglesa Tassman Software, e 
que foi traduzido e comercializado no Brasil 
pela firma Ciberne Software, em uma fita com 
dois outros utilitarios denominada Aplic: esta 
versao levou o nome de Comp-Texto. 

O Tassword e um editor de texto com va- 
rios recursos, dos quais podemos destacar a 
reestruturacao de paragrafos inteiros; centrali- 
zacao de texto na linha; e facil interacao com 
o usuario, tornando-se bastante simples de ser 
utilizado. Como foi dito no inicio, as limita- 
c5es do equipamento o tomaram sem valor 
para aplicacoes comerciais, pois com somente 
32 colunas de texto e com possibilidade de 
said a apenas para as impressoras Alphacom e 
Timex 2040, de dificil aquisicao no Brasil, o 
Tassword tornou-se mais um software de boa 
qualidade sem o mcrecido sucesso. 

A historia deste software teria terminado 
se nao fosse o lancamento no Brasil de duas 
maquinas. Uma delas e' o TK90X, versao da 
Microdigital de um dos mais famosos micros 
da Europa (o ZX Spectrum, sucesso desde 
1982); o outro micro e o tao falado MSX (lan- 
cado no Brasil em duas versoes, o Hotbit, pelo 
grupo Sharp; e o Expert, pela Gradiente). A 
ligacao deste programa com estes lancamen- 
tos e que versoes do antigo Tassword para es- 
tes equipamentos ja existiam no exterior e fo- 
ram trazidas para aqui serem comercializadas. 

A propria Microdigital, atrave's da sua mar- 
ca Microsoft, lancou a versao ja traduzida, que 
incorpora uma rotina de impressao permitin- 
do o uso de interface para impressora parale- 
la no micro TK90X. Alem desta vantagem - 
que por tabela atinge tambe'm os micros da 
linha ZX81 (TK82/83/85), para os quais esta 




Nome: Aplic (Comp-Texto, Comp-Calc, 

Comp-Arq) 
Linha: ZX81 

Fabricante: Cibeme Software 
Endereco: Rua Mayrink Veiga, 32 - SI. 
CEP 20090 - Rio de Janeiro - RJ 
Telefone: (021) 262-6968 
Preco:Cz$ 80.00 



interface tambe'm ja esta disponi'vel no mer- 
cado — , o novo Tassword, rebatizado de Mul- 
titext, possui tambe'm novos e atraentes recur- 
sos, tais como 64 colunas de texto que po- 
dem ser redimensionadas para menos; possibi- 
lidade de trabalhar com blocos de texto e pro- 
cura a substituicao de palavras ou grupo de 
palavras, ale'm de possibilitar o merge de dois 
ou mais textos e uso de caracteres de controle 
para impressoras padrao Epson, contando in- 
clusive com rotinas para redefinicao destes ca- 
racteres. 

A versao do Tassword para o MSX ficou 




Nome: Multitext 

Linha: ZX Spectrum (TK90X) 

Fabricante: Microsoft 

Endereco: Caixa Postal 54121, 

CEP 01136 - SSo Paulo - SP 

Telefone: (011) 825-3355 

Prevo:Cz$ 79,50 



por conta da firma Cibertron Software, que 
o denominou MSX-Word, fazendo tambe'm 
sua traducao para o portugues. As diferencas 
entre as versSes para o TK90X e para os MSX 
sao poucas: na realidade, a unica mudanca sig- 
niflcativa e o fato de a versiSo para o MSX pos- 
sibilitar o uso da acentuacao e o cedilha, o 
que nao acontece com o fantasma da incom- 
patibilidade, pois os MSX nacionais — para 
nao fugir a regra - possuem diferencas entre 
si e justamente na parte da tabela de caracte- 
res reservada para a acentuacao (as diferencas 
entre eles n5o param ai', mas isso e' outra con- 
versa), e isto ira criar uma certa diTiculdade 
em passar textos de uma maquina para outra. 
Mas o problema maior da acentuacao nao 
e este e sim o fato de as listagens nao. sairem 
acentuadas no padrao da impressora assumido 
pelo software, o Epson. Os testes efetuados 
nas impressoras Monica Plus e Grafix foram 
insatisfatprios. Apenas o usuario com mais de- 
dicacao a programacao vai conseguir contor- 
nar estas dificuldades, criando suas proprias 
rotinas de impressao e compatibilizacao. O 
Gerente de Produto da Cibertron, Sr. Alexan- 
dre Sievers, afirmou que em breve o problema 
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Nome: MSX-Word 

Linha: MSX 

Fabricante: Cibertron Software 

Endereco: Caixa Postal 17005 

CEP 02399 - SSo Paulo - SP 

Telefone: (011) 204-9988 

Preco:CzS 162,00 



com as impressoras sera resolvido, atraves da 
incorporacao ao software de rotinas de im- 
pressao especi'ficas para os modelos encontra- 
dos no mercado nacional; MICRO SISTEMAS 
agradece se tais rotinas forem divulgadas. 

A conclusao final e que estes programas, 
todos derivados da mesma fonte, nao sao o 
que existe de melhor em mate'ria de editores 
de texto, mas sao indiscutivelmente os melho- 
res programas que podem ser encontrados a 
um baixo custo de operacao, ja que para utili- 
za-los e preciso basicamente um micro de cus- 
to razoavel, um aparelho de televisao e um 
gravador cassete. A impressora e um requisite 
importante mas nao imprescindivel, ja' que po- 
dem ser alugadas ou emprestadas, sendo que a 
maior vantagem e a facilidade de operacao 
destes editores, o que nao exige do seu usua- 
rio grandes conhccimentos de computacao. 

Os tres programas citados nesta anaiise po- 
dem ser encontrados nos magazines e lojas es- 
pecializadas em informa'tica, ou entao pedidos 
diretamente as empresas que os fabricam. O 
endereco de cada uma destas empresas e dado 
no quadro referente a cada um destes progra- 
mas. Analise feita por Divino C. R. Leitao. 



m 



Pregao e um jogo dinamico, para a 
linha ZX Spectrum, que consiste na si- 
mulacao de um pregao de mercado de 
acSes, onde um jogador se passa por 
operador, comprando e vendendo ti'tu- 
los, dentro de um espaco de tempo (em 
minutos) por ele mesmo definido no 
inicio da partida. Durante o Pregao, o 
jogador pode obter de imediato infor- 
macoes tais como quanto dinheiro ain- 
da tern disponi'vel; 
o tempo aproxi- 
mado para o te"r- 
mino do jogo; si- 
tuacSo geral e acSes 
adquiridas. Pode 
participar da parti- 
da um ou mais 
jogadores, vencen- 
do aquele que fizer 
o melhor investi- 
mento. 

No inicio do 
jogo, a tela apre- 
senta as teclas de 
controle para ope- 
ra9oes e amostra- 
gens e pede o nu- 
mero de jogado- 
res. Em seguida, 
sao solicitados os 
nomes dos acionis- 
tas e o tempo de 
jogo em minutos. 
Comeca, entao, o 
Pregao com os no- 
mes de varias em- 
presas; o valor de 
suas acoes (as que 
estao em alta, se o 
jogador for acionis- 
ta, sao destacadas 
com flash); uma 
coluna com valores 
de compra e outra 
com a quantidade 
de ac5es disponi- 
veis para venda. 

Terminando o 
tempo, o programa 
mostra ao jogador 
sua situacao geral; 
acoes adquiridas; 
capital final; lucros 
e prejui'zos. Ao di- Pregao 



gitar qualquer tecla, o placar final e 
apresentado com o nome dos acionistas 
e os seus respectivos capitais finaisjun- 
tamente com a pergunta se ele deseja ou 
n2o participar de uma outra partida. 
Atenc3o: nao serao aceitas jogadas inva- 



lidas, como, por exemplo, o jogador 
vender mais ti'tulos do que possui. Se 
um acionista demorar muito para efe- 
tuar operates, a sua vez passara para 
outro. _ 



Livio Roberto Pereira Brasil 6 Fisioterapeuta e fez cursos de programafSo BASIC e COBOL. 
Atualmente trabalha como programador no CPD da Montreal Engenharia. no Rio de Janeiro. 
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• LIVIO R. BRS5IL « 

* * 
*********************** 

5 GOSUB 908B 
7 CLS 

10 DIM NJCY.12): DIM CdSl.lS) 
DIM CISO): DIM VIY,2Q>: DIM AC 

201 DIM RIY.20): DIM KIY,20I: D 
IM D1Y1 

11 POO K=l TO Y: INPUT "BCIONI 
STfl ",(Kli" ";N$(K1: LET D(K)«50 
O0OO NEXT K 

12 LET L*«" 

13 INPUT "TEMPO DE JOGO EM MIN 
";TEMP 

IS LET l=TEMP*200 

19 FOR K«l TO 20. RERD CJ(K) . 
LET C(KI>8: LET RCKI =90000: NEXT 

K 

20 FOR K.l TO 19 

21 FOR J=K«1 TO 20 

22 IF C$IKI<CHJ) THEN GOTO 2i 

23 LET H»=C$(Kli LET C»(K1=C«I 
Ul . LET CJIJ1 =H« 

2d NEXT J 
2S NEXT K 

1: EOPDEP 7 PfiPER 7 INK 0: C 
LS 

29 LET J=l LET 5T=0 

30 LET OPT =30: CLS I 
0,0; ' NOME". AT 0, 10; ' 



BT 0,19," U/URL";RT 0,25;' 



PRINT AT 
COTACAO "i 



O/A 



35 PRINT 

40 FOR K=l TO 20 

50 PRINT TAB 0;C«IK);TAB 14;CI 

K)M".0" AMD LEN STR« IC <K1 ) =11 ; 

TAB 21;U(J,KJJ C".0" AND LEN 5TR» 

(VU.KI ) =11 ;TAB 31-LEN STR* (Al 

M 1 ; A(K1 

60 NEXT K 

61 INPUT "": PRINT «l;"flCI0NIS 
TA ": (Jl ; " - ": (N« (Jl 1 

70 LET 0=100 

101 IF INKEYfO"" TMEN LET U = I 
NKEYt GOTO 110 

102 LET B0R=INT (5T/13) BORDER 
BOP LET 3T=5T*1: IF ST < 100 THE 

N GOTO 104 

103 LET ST=0 LET J=J.(1 AND J< 
/1-IU-ll AND J=Y> GOTO OPT 

104 LET t.t-li IF t<=0 THEN GOT 
j 1000 

105 GOTO 1000 
110 GOTO 105*115 AND I*m"C"I*(1 

95 AMD IJ="U"l+(295 AND I$="A"i+ 
1395 AND I»="D"I » (495 AND I«="T" 
I »r.54S AND I« = "P") 

120 INPUT " ICOMPRA) CIA ";0* 

130 FOR K=l TO 20 

132 IF 0*=C»IK, TO LEN 0(1 TMEN 

INPUT ICt(K)i;~ S/N ";H: IF I» 
="S" TMEN GOTO 140 

135 NEXT K; INPUT "COMP INEX ", 
"OUTRA ";U: IF I$ = "S" TMEN GOTO 

120 

136 INPUT "": PRINT «1; "ACIONIS 
TA " : ( Jl ; " - ";1N*U)I: GOTO 100 

140 INPUT "OUANTIDADE " ; OT 

145 IF QT<=AIKI THEN GOTO 160 

146 INPUT "OUANT EXCESS ";"0UT 
";I* IF I»="S" THEN GOTO 1*0 

147 INPUT "": PRINT Bl; "ACIONIS 
TA ";(J>;" - ";(Nt(Jll: GOTO 100 

160 IF 0T»C1K1 <=DUI THEN GOTO 
170 

161 INPUT "S/FUNDOS. OUT " ; I» 
IF I$="S" THEN GOTO 140 

162 INPUT "": PRINT Bl; "ACIONIS 
TA ";(JI|" - ";(N$(J11: GOTO 100 



170 LET DIJ1 =DUI -OTliClKl . LET 
D(JI=INT IDU11: LET A(KJ=A(Kl-0 
T: LET V(J,K)=C(K): LET P1J,K1=P 
U.Kl *0T 

190 LET J=J*1: LET ST=0 

191 IF J>Y THEN LET J.l: GOTO 
PT 

195 GOTO OPT 

300 INPUT "lUEHDAi CIA " . 0« 

305 FOR K=l TO 20 

306 IF P(J,K)=0 THEN GOTO 315 
310 IF 0«=C»1K, TO LEN 0»1 THEN 
INPUT ICtlKll,'" S/N ";I»: IF I» 

•"S" THEN GOTO 330 

315 NEXT K: INPUT "COMP INEX. 
UT ";I»: IF I*="S" THEN GOTO 300 

320 INPUT "": PRINT Bl; "ACIONIS 
TA "; (Jl ; " - ";IN»U)1: GOTO 100 

330 INPUT "OUANTIDADE ";OT; 

335 IF P(J,K)=0 THEN INPUT "N T 
EH ACOES"; If: INPUT "": PRINT Bl 
; "ACIONISTA ";(Jl;" - ";(N$IJII: 

GOTO 100 

340 IF P(J,K1>=0T TMEN GOTO 360 

345 INPUT "OUANT EXCESS. OUT " 
If: IF H = "S" THEN GOTO 330 

350 INPUT "■■ : PRINT Bl, 'ACIONIS 
TA ";UI;" - ";(N*(JII: GOTO 100 

360 LET D(J1 «D(JI *OT«C(KI : LET 
D(J>=INT 1DU11: LET P(J,Kl=P(J, 
KI-OT: LET AIM=ACK1*0T 

370 LET J=J*1; LET SP=0 

330 IF JlY THEN LET J=l 

390 GOTO OPT 

400 LET OPT =400. CLS 

410 PRINT AT 0,0;" NOME'jAT 0. 
10;" COTACAO"; AT 0,19;" U/UAL . 
AT 0,25;" 0/A": PRINT 

420 FOR K«l TO 20 

430 IF P(J,K1=0 THEN PRINT : GO 
TO 460 

4-4B PRINT TAB 0;C*1K);TBB 14; C 1 
Kl;TAB 21;U(J,K1 ; (" .0" AND LEN S 
TR» (VlJ.Kl 1 all ;TBB 31-LEN STRS 
IPtJ.Kl 1 ;P(J,K1 

460 NEXT K 

465 INPUT "": PRINT Bl;"BCIONIS 
Tfl "; IJI ;" - "; (N*UI I 

470 IF INKEY$="" THEN LET 0=470 
: GOTO 100 

480 IF INKEY»="M" THEN LET 0=30 
LET OPT =30. GOTO 1000 

490 GOTO 100 

500 INPUT "UOCE TEM ",(0<J11," 
": I* 

510 INPUT "" : PRINT Bl; "BCIONI 
STA ";U1;" - ";IN»(J11 GOTO 10 



600 LET Z=INT IT/2001 

610 INPUT "UOCE TEM APROX "; (21 
; " MIN "jl«: INPUT " " : PRINT Bl; 
"ACIONISTA ";(JI;" - ";(N«(J11. 
GOTO 100 

650 COPY GOTO 100 

900 STOP 
1000 LET Z = IMT :RND-20.'*1 
1010 LET K.INT IRND»21 IF K=0 T 
HEN LET K«-l 
1015 IF RND>,97 THEM LET K=l 

1020 LET CiZl =C(ZI *(K/10l 

1021 IF C(ZI<0.1 THEN LET C(Z1=0 

1022 IF C1Z1>9.9 THEN LET C(ZI=9 
.9 

1025 IF C(ZI>U(J,Zi AND P(J,Z1<> 
THEN LET FL=1 GOTO 1027 

1026 LET FL=0 

1027 IF C(Z) -UCJ.Z1 1 .5 AND PU.Z 
1 <>0 THEN SOUND .01,30 

1028 IF P(J,Z)=0 AND 0=470 THEM 
GOTO 1040 

1030 print at z+1,14; flash fl . c 
(zl; if len str» icizii=1 then 
print bt z*l,15; flash fl; flash 

Fl;".0" 



1040 C-OTO 

2000 LET CP=-10000O: FOP H=l TO 

' CLS PRINT " ACERTO 

FIMA_ ' "ACIONISTA ";H;" - ",N« 

(H) ' 

2020 -ET T0=0: FOR K=l TO 20 
2030 IF P(H,K!=0 THEN GOTO 2040 
2035 =RIMT TAB '5- ILEN STR« 1PIH 

,KI 1 I » ;P(H,K! ; " ACOES DA ";C$(K1 

'"U.COM ";V(H,K1; (".0" AMD LEN S 

TPS VCH.K! =11; " U.ATUAL ";C(K);( 

.0" AND LEN STR« C IK1 =11 ; " DF " 

:. LET ULfl=INT ( (P (H,K) *C (Kl I - IP 

1H M tUCH.K) )) 

2033 PRINT TAB 32-LEN STRJ ULA; U 
LA ' 

2039 LET T0=T0*P(H,KI *C(KI 

2040 NEXT K 

2050 PRINT "TOTAL EM ACOES " T 
AB 32-LEN (STRJ (INT TOI I ; INT TO 

2055 PRINT ' : PRINT "TOTAL EM C 
AIXA";TAB 32-LEN (STR* (D(H)));D 

(Hr ' 

2056 PRINT TAB 24; " " 

2060 LET T0 = IMT 1TO+D (Ml 1 : PRINT 

.SOMA TOTAL = " ; TAB 32-LEN (S 
TRJ, (TOI 1 ;TO; ' ' 

2070 PRINT "DIFERENCA • ";: LET 
DI=TO-500000 PRINT TBB 32-LEN ( 
STRJ :ABS DI1 1 ; ABS DI' ' 
2030 PRINT " ' "; ("DEUEDOR" BND 

SGM DI«-1I * ("CREDOR" AND SGM DI 
= 11 

2034 LET D'.Hi =T0 

2085 IF CP'TO TMEN LET CP=TO lE 

T CAHP=H 

2090 IF INKEY$ = — 

2100 NEXT H- 

2101 CLS : PRINT 
-1 

2102 FOP J=K TO Y 

2103 IF D(K1 (D1J1 
LET D(K1 .D(J1 : 



THEN GOTO 2090 
' : FOR K=l TO Y 



THEN LET U"D (K 
LET D(J) =U LE 



LET NJ(M=NJU1: LET 



FOR J=l TO V 
TAB 32-LEM STRJ 



T GJsNJ (KJ : 
NJIJi =GJ 

2104 NEXT J 

2105 NEXT K 
210= CLS : PRINT 

2107 PRINT NJIJ1 ; 
ID'--" i , D'Jl 

2108 MEXT J 

2110 INPUT "OUtRA PARTIDA S/N ? 

".RJ 

2120 IF RJ<>"3" AND R»o"N" THEN 

GOTO 2110 
2130 IF RJ="5" THEN RUN 
2140 STOP 

9000 CLS : PRINT - P 

REGAO ESTE JOGO SIMULA A 

COMPRA E UENDA DE ACO 

ES." '"UOCE RODE USAR AS TECLAS 

" - p COmcPhP ACOES " "<',>. P 
/UENDER ACOES" " H . MOSTPB A SIT 

UACAO GERAL %A> MOSTRA APENAS 

AS SUAS ACOES" 

9010 PRINT "<D- INFORMA OUANTO D 

INMEIRO UOCE TEM DISPOMIUE 

L <T> INFORMA TEMPO APROXIMA 

DO";" PARA TERHINAR JOGO" 
PO-.E 23653,3: INPUT "NUMERO DE 

JOGADORES ".Y. INPUT "APERTE EM 
TEP P COMECAR ",YJ RETURN 
9990 DATA "HP '. "RITAS" , "MICRODIG 
ITAL" . "COMMODORE" , "TIMEX" , "DRAGO 
N" "GRADIENTE" "DIGITUS" , "SID" . " 
UNITRON" , "APPLE" , "TANDY" , "SIMCLA 
IR" , "PROLOGICA" , " IBM" , "BURROUGHS 
|| , "COBRA" , "TEXA5" , "ATBRI" , "SHARP 

9599 5AUE "PREGAO" LINE 5 
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trs-80 trs-80 trs-80 trs-8 



Missao Alfa 



Heber Jorge da Silva 



Missao Alfa 6 um interessante joguinho desenvolvido para 
os micros da linha TRS-80 modelos I/HI. Com ele, voce pode- 
ra* treinar sua pontaria em alvos que nab sab naves aliem'genas 
e sim letras que se movimentam, as quais o leitor tera" que atin- 
gir com seus mi'sseis ate completar todo o alfabeto. A cada le- 
tra atingida, 6 colocado em seu lugar um bloco grafico e se um 
desses blocos for atingido, o seu missel se fragmentary e caira 
sobre a sua nave, podendo destruf-la. 

programa tern nove nfveis de dificuldades, sendo que o 
ni'vel 9 6 o mais facil e o ni'vel 1 6 o mais dificH. Toda vez que 
voce veneer em um ni'vel serd automaticamente conduzido a 
outro mais difi'cil, e assim por diante, ate" chegar ao nivel 1. 
Sua municSo 6 controlada, isto 6, dependendo do nfvel de 
dificuldade, voce a texi em maior ou menor quantidade. Se 



a sua municao acabar, voce perdera sua nave. Para conseguir 
munica"o extra, sera" necessano atingir o modulo de municao 
(seta para a direita), que de vez em quando cruza o video da 
esquerda para a direita. 

Primeiramente, digite o programa, gravando-o em fita ou 
disco. Como ele utiliza uma rotina de som em linguagem de 
maquina, antes de rodd-lo, responda a pergunta PROTEGER? 
com 32738. 



Formado em Administracao de Empresas pela UDF, Heber Jorge da 
Silva trabalha atualmente na Telebrasi'lia, onde exerce atividades liga- 
das a programafSo de microcomputadores. 



1 REM •■•••■■•..•.■•■......>..,..».,,..,,,,,,,,,,,,,,,,,.,,.,, 

2 REM »« MISSAO ALFA „ 

3 REM *» Por Heber Joraa da Silva - Brasilia DF. 08/0S/34 u 

4 REM .............. ..,».,,,,,,,, .,,,,,.,,. ,,,,,,,,,,,, ,,,.,.. 

5 CLEARSOOOiDEFINTA-ZlDIMI»(lo) 

6 FF*="A8CDEFGHIJKLMNOP0RSTUUWXYZ"iN«-CHF.«(12B)*CHF.«(184)-»CHR«(! 
73>*CHR«(144>*CHR«(;28>lTC-14400lT»-CHR»(91)iAP»-CHR»(32)iVI-153 
60.E».STRING»(1O.3Z^iAN»-STRING»<S,32)iBL»-CHR»(46)iX1«-STR1NS«( 
I.!53)iX2»-STRINS*(3. 166) : AL«-CHR» (30) |PM-12B*RND (56) 

7 ED-3273S:IFFEEK(163?6)-20nHENF0KElo527.ED/2S6!p0KEJo526.EDAND 
2S5ELSEDEFUSR-3273? 

8 F0fiP!-EDTOED*2BlREADXlP0k"EP!.XlNEXTP'iG0T049 

9 PT-Ol D-Ol Y-Oi P-Oi PC-Oi AC-Ol MU-O: F-Ol DP-Ol BM-Oi AT-Oi RANDOM 

!0 CLS:PRINTCHR»<23> 19384. "Nival da Di+iculdaoe: " I PF.lNTi PR1NT"D# 
1 (diticil) a 9 («acil>" 

11 D»-INKEY»lIFD»-""THENllELSED-VAL(D»):IFD<10F.D>9THENll 

12 Y-9-D.PI-286*64«YiP.P1iCLSiPRINTCHR»(23)i8400,"UM MOMENTQ ... 
" I I MU-LEN (PF») * ( 10-D) «Z 

13 *•" F0RI-lTOLEN(PF»)iFOF.J-lT0DlA«-A«»MlD«(PF«. I. 1) iNEXTJ.I 

14 F0RI-lT0LEN(A»>!lFLEN(A»>>233THEN15ELSEA««A«*MID»(A«.I.l>iNEX 

15 IFLEN ( A* )< 234THEN 1 4ELSEA«=E»*A«*E» 

16 VP l-VARPTP. (A») lEN' -PEEK (VP ! *2> «2S6«PEEK (UP ■ *1 > i IFEN ■ >32767THE 
NEN! -EN! -65536 

17 CLSlPOKEVI-M.lB3iPOKEVI-.60. 187iFRINT»F 1--34. "Municaoi '^STKIN 
G*(MU.91)nPRINTePI*98."AcertQ»i ( Nival "D")i " :8PI-H32. "Tecle "C 
HR«(34)"CLEAR"CHR«(34)" oara novo ,ooo" :PKINTPF«i 

18 F0RX-lT0LEN(A»>iPRINT82.MID»(A».X.38)iG0SUB22ilFDPPRINT8PT.T» 
IINEXIXELSENEXTX 

19 PRINT820."v o 1 t a n d o . . ."tiG05UB48 

20 FORX-LEN(A*)T01STEP-l!PRINT82.MID«(A*.X.58)lGOSUB22i IFDPTHENP 
RINT8FT. T»! iNEXTXELSENEXTX 

21 GOT018 

22 PRINT8F.NS! 1 AC-FEEK (VI-.PT-64) iR-RND(20) 1 IFR-DTHENBM— 1 

23 IFAC-191AT— ltPC-PT*64lU-USR(780) 

24 lFAC-94ANDDFFRINT8FT.AF« I iBM.OlDF-O.F-0!PM>128*RND(56)lAM.KNO 
(10>lF0RI-lT0AMiPRINT8PT-133."Bonu«"iIiiG0SUB48iMU-MU-(MU*KLEN( 
PF«)-f(10-D)»2)ipfiINT8Pl*44.SIRlNG»(KU.91)iAL«iepT-64.CHR*(42)ieF 
T-130.AL»i8PT-64.AP»iiNEXTiPRINT8192.AL*i 

25 IFAO64ANDAC<91P0KEVI*PT-64. lSliP0KE£N:*X-fPT-67. 191 iU-USR(800 
>lGOSUB67 

26 IFEC-LEN{PF»>THENPMNT8PI-M63." Muito baa, CAMPEAO!!! "nGDS 
UB47iIFECANDD>lTHENPRINTlPRINT"TENIE AGORA NIVEL-iD-1 I "...-; I F 

0RT-lT08O0lNEXTTiEC=-0lF-0lPT-OiD-D-llDP-0lGOT012ELSEMS*= ,, QUE SOfi 
TE HEIM?! f ! "IG0TO4O 

27 lFATTHENPRINT8PC.AP*iePC*B.AP*:8FC-C.AP*!!A=fiND(S):B=RND(18)i 
C-RND(15>lPC-PC*61*AlPRINT8PC.BL»iePC*B,BL*l8PC-C.BL*ll IFPC>3191- 
64IYTHENAT-0 

28 IFPC>2S5->-64«YPRINI8PC.AP» I 8PC*B.AP*i8PC-C.AP*i :PC-O.AT-OE' SEl 
FPEEK(VI*p064>>128THENMS»-"Que Pena !!! QUASE QUE VOCE GANHA . 

. "■FRINTeFC,AF» I 8FC*B.AF«l8FC-C.AF«iiG0SUB4o!F=-liG0T040 

29 IFBMTHENPM-PM-(PM»l<l9l>:PRINT8PM.CHR»(94)!:IFPM>l90THENBM-0i 
PRINT81B9.AP«:AP« I iPM-l28.RND(S6) 

30 IFDPTHENPRINT8PT.AP»i iPT-PT-641 IFPT<64ANDFTHEN60SUB46!G0T040E 
LSEIFPK64THENDP-0 

31 IFBMTHENPRINT8PM-l.AP«i 

32 FK-FEEK(TC)! IFFKAND2RUN 

33 IFPKAND32THENF-P-KP-2>2S5*64«Y)ELSEIFPKAND64THENF-P-(P*2<31=- 

34 IFPK-BANDNOTAITHENEE— 1 I G0T03BELSE 1FPK= 1 6ANDN0TATTHEN3B 



35 IFPK>127TMENIFDP-0THENU-USR(1050)iDP— 1 iPT-P-=2i FRINT8PT.T*! i 
MU-MU-KMU-1>-1)iPRINT8FI->44.STR1NG»(MU.91)iAL»i 

36 IFMU=OTHENMS»-"FALTOU MUNICAOM- Voca irrou auitm tiros... "i 
F— 1 

37 RETURN 

38 PRINT8P. AN*i I IFEETHENF-2So»o4«YELSEF-313*o4«Y 

39 EE-0 1 RETURN 

40 PRINT8PI-H32.AL»:8PT.AF*ia0.AL«i8FM-l.AL»l80.i!F0FT-VlT0VI*D3 
:P0KET, 128iNEXTT 

41 R=RND(LEN(MS»))iIFPEEK(VH-RX>128THEN42ELSEV-V*llFRINTQF.MIU» 
(MSS.R, 1) | iU»USR(1500+R*4) 

42 IFV<LEN(MS«)THEN41ELSEV-0iPRINT8LEN<MS«)*3."N0V0 JOGO ? <S/N) 
"i 

43 K*=.INKEY»iIFFANDK»-""THENPRINT8P*l.Xl*:iU-USR(1200-.F.ND(200))l 
PRINT8Pi-l.X2»llG0T043ELSEIFK»-""THEN43 

44 IFK»= ,, S"ORK«-"s"THENRUNELSElFK»-"N"ORKS-"n"THENCLSiEND 

45 60T043 

46 F0RT-80T0lSTEP-lrU-USR(5l2*T)iNEXTTiRETURN 

47 FORT=l80TO!STEP-liU=USR(S12i-T)iNEXTTlRETURN 
46 F0RT-lT010lU-USR<5l2.T):NEXTTiRETURN 

49 CLS:PRINTCHR»(23):8402."» MISSAO ALFA *" .PRINTiPRINT" ( 1984) D 
or Heber Jorqa da Silva":G0BUB47iPF.INT87l4. "QUER INSTRUCOES (S/N 

50 K»-INKEY*s IFK»-""THENS0ELSEIFK•-"N"0F.K« = "n"THEN9ELSEIFK«<>"S ,, 
ANDK«O ,, s , 'THENG0ELSECLSiPRINTTAB(24>"» INSTRUCOES •" 

51 1*(0>-"G objetivo a' acertar as letras ate' comoletar todo o 
alfabeto." 

52 I* ( 1 )""Ouando uma letra -for atlnaida. um bloco qrafico a subs 
tituira'. " 

53 I»(2>="0s disoaros que atinairam os blocos se + raamentarao. c 
aindo os" 

54 IS(3)-"estilhacos sobre a base. Caso esta ae,a atinqida. a m: 
ssao tar-" 

55 I*(4)-"minara' . A quantidade de municac varia de acordo com o 
nivel da" 

56 IS(5)*="dl<iculdade do ,oao. Para oanhar municao extra, voce t 
mra' da" 

57 IS(6)="atlno:r o objato "+CHFS (34) *CHF« <94>+CHRS(34)+" qua 'a 
s vezes cruza o video. Se a municao" 

58 I«(7)="acabar, a missao estara' terminada com a sua derrota. 
Aoos van-" 

59 I*(B)="cer em um nivel. voce sera' automaticamente convidado 
a , .togar " 

60 IS(9)a"em um nival mais dl-ficil. ate'eheaar ao nivel 1 (mais 
dificil)." 

61 I*(10)"CHR»(210)+"TECLAS DE COHTROLE DA NAVE" 

62 I»(11)»"<"+CHRS(93)*"> » move Dara a esquerda <"+CHRS( 
94)-»"> = move para a direita" 

63 I*(12)="<"+CHRS(91)+"> = move o/ extrema esquerda <"+CHRS( 
92)*"> ■ move o/ extrema direita" 

64 I»(13)="<ESPAC0> - disoara missels <CLEAR> - nova miss 
ao" 

65 F0fil-0T013iGOSUB68iNEXTIiPRINT897B."Tec!e RETURN oara continu 
ar"i 

66 IFINKEY»-""THENU-USR(512*RND(30))iGOT066ELSEGOSUB48iGOT09 

67 F0RI-VI*PI-H62T0VI*PI*187lIFPEEK(I)-ACTHENP0KEI. 191 I EC-EC* 1 iR 
ETURNELSENEXT s RETURN 

68 S=580iF0RJ-lTOLEN(I»(I)).S-S-liU-USR(S)iPRINTCHR*(128*RMD(63) 
)lCHR»(24)|MID»(I*(I).J.l) llNEXTJsPRINTlRETURN 

69 DATA 205.127.10.62.1.14.0.237.91.61.64.69.47.230.3. 179.211,25 
5. 13.40.4. 16.246.24.242.37.32.241.20! 



Missao Alfa 
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M MICROMAQ 




Sempre IMovidades 



-ESPECIAIS 



Estes programas foram considerados os melhores, ate hoje, em suas modalidades. 
Caneta Otica • Deskmate • Gold Runner ■ Karate ■ Knock Out 'Marble Maze 'Pitstop II 
Module Manm Shock TroppermP 51 Mustang^ OSS'Sist. Operacional ■ Batalha Naval 



r \ 



COLOR 

CP-400,Color64,MX 1600-etC. 



ADVENTURES 



Cod. F/0 



Programa 



Manual 



Prsco 



Descrlcao 



PO.012 D Blackboard's Island NSo 128,00 

PD 013 D Dallas Quest Ingles 128.00 

PD 016 D Marooned Nao 128,00 

PD017 F D The Martian Crypl NSo 48,00 

PD.019 F D Trckboer NSo 48.00 

PD.020 F D Vonex Factor NSo 48.00 



Programas onde voce responde 

as perguntas a medida em que 

vive uma aventura emocionante. 

Alta resoluc3o grafica. 



JOGOS 



PJ.105 F7D Btewmastor N3o 

PJ.109 F '0 Chambeis NSo 

PJ.110 F D Columbia Nao 

PJ.111 F/D CrazyPainter N3o 

PJ.112 F/p Downland Nao 

PJ.113 D Dragon Slayer N3o 

PJ.115 F/D FighterPiloi Nao 

PJ.116 p Ghana Bwana Inglds 

PJ.117 F/D Gold Runner N3o 

PJ.119 F/D Jaws N3o 

PJ.120' F/D KaratS Nao 

PJ.121 F/D King Tut Nao 

PJ.122 D Knock Out Ingles 

PJ.123 F/D Marble Maze Ingles 

PJ.124 F/D Module Man Nao 

PJ.125 F/D Mr. Dig Nao 

PJ.I27 D One on One Ingles 

PJ.128 F/D Pegasus Nao 

PJ.129 F/D Pengon Nao 

PJ.130 D Pitstopll Ingles 

PJ.132 F/D Shock Trooper NSo 

PJ.133 F/D Shooting Gallery N3o 

PJ.135 F/D Stellar LUeline Nao 



48,00 Ajude o garpom a servir as cervejas. 

48.00 Excelente. Um dos mais bonitos e movimentados jogos de labirinto. 

48.00 Sobrevoe o mundo.inimigo delendendo sua nave. 

48.00 Tente pintar o video combatendo os chatos que tentam impedir. 

48.00 Ultrapasse obstaculos e apanhe os tesouros escapando dos pingos. 

128.00 Adventure mesclado com labirinto. Exceptional!! 

48.00 Mais um combate aereo, bom programa no genero. 

128,00 Faca uma incursSoao territdrio inimigo para recuperarseu baldo. 

60,00 Aventura baseada no filme Load Runner. 

48,00 Estilo packman. Considerado o melhor deles. Voc6 cria labirintos. 

60,00 A grande sensac3o. S6vendo para crer. 

48.00 Capture suas coroas escapando das seipentes e dos fantasmas. 

140.00 Lutadeboxe. Tridimensional. Sensacional. 

60.00 Indescritivel. Labirinto tridimensional. Um dos melhores do ano. 

60.00 Outra sensacSo. Dos mais vendidos nos EUA. 

48,00 Ajude ocoeihoa comersuascenouras. 

128.00 Jogo de basquete muito difundido nos EUA. Um contra um. 

48.00 Similar ao Buzzard Bait. Graficosde altissima qualidade. 

48,00 Ajude o pinguim a eliminar os insetos com seus cubos de gelo. 

140.00 Empolgante corrida c/ reabasiecimento e troca de pneus. At6 2 jog. 

60.00 Considerado junto c/ Marble Maze, os dois melhores prog, do ano. 

48,00 Galerla de tiros de um parque de diversdes. Muito bonito. 

48,00 Proteja seu comboio do ataque dos alienigenas. 



TRADICIONAIS 



PP.009 F/D Batalha Naval Port. 

PP.010 F/D Bridge N3o 

PP.011 F/D Gomoku and Renju N3o 

PP.012 F/D Moneyopoly ' N3o 



100,00 A tradicional, em alta resolucao. LindissimalM 

48,00 Para os amantes deste tipo de jogo. 

.48.00 Tradicional passatempo oriental em tabuleiro. 

48.00 banco imobiliario que voce ja conhece. Divertidissimo. 



SIMULADORES 



PS.004 F/D Boeing 747 Ingles 80,00 

PS.005 F/D P-51 Mustang Ingles 100,00 

PS.006 F SR-71 Port. 80,00 



Simulador. Cabine de Boeing 747. 

Simulador de vdo c/ combate entre dois comput. ou contra o s 

Simulador de vdo em tempo de guerra. 



APLICATIVOS 



£.001 D OS-9/Sist. Operacional Ingles 

PA.031 F/D Caneta Otica Port. 

PA.036 D Controle de Assinantes Port. 

PA.032 D Controle de Estoque Port. 

PA .033 D Deskmate Ingles 



PA. 035 

PG.008 



Pro Color File Enhanced Ingles 
Cocomaxll Ingles 



800,00 Sistema ooeracional multiusuario. multitarefa em real time. 

250,00 Light pen. Acompanha software e manual. 

500,00 Capacidade para 900 assinantes. 

500,00 Capacidade para 630 itens. 

500,00 Sist. integrado composto de sets programas baseado no Lotus 1,2.3 

400,00 A grande sensacao em bancos de dados. 

300,00 O grande conhecido dos usuarios, agora com controle por teclado. 



utilitArios 



PU.021 D Disk Drive Analyzer NSo 

PU.022 F/D HI-RES II Ingles 

PU.023 F/D ML Basic Ingles 

PU.024 D Piratector Ingles 

PU.025 F/D Tapedupe NSo 

PU-027 F/D Utility Routines Ingles 



300.00 Analis&dor de luncionamento de drives com varios tipos de teste. 

120,00 Transforma o video de seu color para alta resolucSo. Bern versatil. 

320,00 mais poderoso compilador. 

360,00 Potenteprotetorde programas criados'porvoce. Ningu&m abre. 

280,00 Duplicador de fitas. Duplica f itas protegidas, menos da Micromaq. 

200.00 28 rotinas utilitarias para seus programas. Agora em fita. 



Importante, Os programas que tenham opcao F ou D estao com seus precos na versSo Fita. 
aquisicSo em Disco, anexar CzS 80,00 de Disco e Embalagem. 

Fapa seu pedido pelo correio, 
para o endereco abaixo, 
anexando Cheque ou Vale Postal e 
receba, SEM MAIS DESPESAS, 
em aproximadamente 15 dias. 



Para 



MICRO SISTEMAS, junho/86 






MSX 



JOGOS 



ANTARTIDA ADVENTURE - Um gostoso passeio pela 
Antartida acompanhado de um pinguim. Prego: A 

KEYSTONE KAPERS - Prenda o ladrao antes que seu 
tempo acabe. Prego: A 

GALAGA - Identico ao "FANTASTIC" do fliperama. 
Realmente FANTASTlCO. Preco: A 

LUNAR — Um passeio com seu jeep lunar pode n§o ser 
muito tranquilo. Prepo: A 

PADEIRO MALUCO - Nesta padaria existem raposas 
prontas a acabar com a sua producSo. N3o deixe isto acontecer. 
Prego: A 

GALAX — Num mundo irreal e inenarravel voce deve lutar 
para sobreviver. Prego: A 

ROAD FIGHTER — Escolhido na Europa como o melhor 
game para a linha MSX em 1985. Eletrizante corrida de carros 
por praias, estradas, pontes e etc. Prego: B 

COSMO — Defenda a sua base contra os invasores. 9 
niveis de dificuldade. Prego: A 

CANNON — Voc§ e o ultimo soldado da sua artilharia. 
Defenda o seu forte usando o canhSo. Os tanques e avides 
inimigos est3o atacando. Prego: A 

COELHO MALUCO — Escale o pr6dio evitando os outros 
animais e pegando o maximo de cenouras possiwl. Prego: A 

DIZZY BALL — As pedras vao rolar. Nao deixe que caiam 
sobre vocd. Quebre todas possiveis para pegar os potes. R A 

FLIPPER - Sinta-se numa das melhores mesas de FLI- 
PERAMA. Prego: A 

FAIXA PRETA — Lute contra animais e lutadores assas- 
sinos. Prego: A 

BOEING — Simulador de vdo. Prego: B 

POLAR STAR — Num planeta distante voce deve invadir 
as bases do inimigo e destrui-las. Prego: A 

SHADOW ADVENTURE - Voce era o piloto de um 
avi3o espiSo que caiu na SIBERIA. NSo se deixe pegar pelos 
inimigos nem frio. Requer conhecimentos de INGLES. R A 

SUPER COBRA — Com o seu helic6ptero invada a base 
inimiga sem ser capturado. Prego: A 

TURBOAT — Enfrente os perigos com a sua lancha a jato 
dentro de um rio. Prego: A 

MR. CHIN — grande equilibrista de pratos, Mr. Chin, 
n3o pode deixar que os pratos caiam nem ser pego por terriveis 
assassinos. Prego: A 

FROGGER -Ajude o sapoatravessar a rua e o rio. PA 

ARVORE MAGICA - Suba o mais alto que puder nesta 
arvore e reoleta de armadilhas: Prego: A 

OLIMPIADA I — Alguns desafios para vocd provar que 6 
um atleta. Prego: A 

OLIMPIADASII — Como o anterior, mostre que vocd e 
um atleta. Prego: A 

COLUMBIA — Defenda seu planeta contra as inumeras 
naves inimigas. Como no Flipper. Prego: A 

PITFALL II - Aventura na floresta Wpo ATARI). P. A 

RIVER RAID - Identico ao do COLECO. Avance rio 
adentro combatendo os inimigos. Prego: A 

CORRIDA MALUCA — Pegue todas as bandeiras dentro 
do labirinto mas fuja dos carros que Ihe perseguem, SENSA- 
CIONAL. Prego: A 

DECATHLON — Igual ao do Flipperama. Preco: A 

HIPER SPORT I — Provas esportivas. Prego: A 

HIPER SPORT II - IDEM . Tiro ao alvo. Prego: A 

HERO — Destrua obstaculos, enfrente monstros e animais 
nesta emocionante aventura dentro de um verdadeiro labirinto, 
e salve sua herofna. Prego: A 

LE MANS — Sensacional corrida de carros. Mostre suas 
habilidades como piloto. Prego: A 

GHOSTBUSTERS - Reviva as emogfies do filme "Os 
Cagas Fantasmas". Preco: A 



EDUCATIVOS 



MATEMATICA INFANTIL C) - Para criancas em fase 
de aprendizado. Exercita as quatro operacoes basicas. Preco: A 

MACACO ACADEMICO — Jogo matematico com as 
quatro operacdes basicas. Preco: A 



APLICATIVOS 



MALA POSTAL (•) - Um super banco de dados. Total 
facilidade em apagar, alterar, buscar, ordenar e inserir registros. 
3 tipos de relalorios (inclusive etiquetas). Metodo de ordenacao 
rapido. Capacidade para 100 registros com 1 campo para obser- 
vances de 30 caracteres. Preco: C 

TASWORD — Um poderosissimo processador de textos, 
Uma quantidade enorme de recursos. Man em ingles. Preco: C 

MAGIA - Numerologia, horOscopo e biorritmo. Preco: A 

CALENDARIO — Calendario, tabela de conversSo 
CRUZEIRO x CRUZADO. Prego: A 

GRAFICOS BIDIMENSIONAIS - Uma poderosa ajuda 
na visualizac3o das funcSes MATEMATICAS criadas pelo 
usuario. Aceita qualquer func3o matematica. Preco: B 

C) - PROGRAMAS DESENVOLVIDOS NA MICROMAQ 
TABELA: A - CzS 50,00 B - CzS 70,00 C - CzS 120,00 



MICROMAQ - Rua Sete de Setembro, 92 - Loja 106 - Tel.: 222.6088 - Rio de Janeiro, RJ - CEP 20050 
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Rotulador de fitas 



Gelson Dias Santos 



programa Rotulador de fitas 
cassete foi desenvolvido em urn 
TK90X, equipado com uma impres- 
sora Alphacon 32, com o objetivo de 
por em ordem a minha fitoteca. Tudo 
comecou quando o numero de 
cassetes da mesma passou a aumentar 
progressivamente, dificultando a i- 
dentificacao do conteudo de cada 
uma. Ocorre que eu tenho por hdbito 
comprar fitas de uma linica marca, 
conseqiientemente, por fora todas as 
fitas sao iguais. 

Alem disso, eu nao tinha controle 
sobre o que gravar em determinada 
fita, resultando em uma salada na 
qua! cada uma continha ao mesmo 
tempo jogos, aplicativos, programas 
em desenvolvimento etc., tornando 
ainda mais difi'cil a localiza^ao dos 
programas. 

A fim de resolver estes pioblemas, 
elaborei o programa Rotulador. 

PROGRAMA 



rrrn 



ROTULADOR 



Figura 1 - capo 



FITA NUM.. 



» CONTEUDO LBDO 



IINICIO/ FIM 

1 

1 ' 


NOME DO PROGPAHA: 


1 / 




l 

1 * 




1 




1 




1 ' 




' 




' 




/ 





Figura 2 - lista 



Rotulador foi desenvolvido para 
ser usado com as impressoras Timex 
Sinclair 2040 ou Alphacon 32. Ou- 
tras impressoras nlo poderao ser usa- 
das (como a ZX Printer) devido as 
diferencas no formato de impressSo. 

A funcao do programa 6, como 
nome diz, imprimir r6tulos para os cassetes. Alem disso, ele 
gera tanibem uma lista para facilitar o registro de cada progra- 
ma gravado. 

Ao ser executado, ele inicia mostrando o menu de opcOes. 
Digitando 1 , o programa solid ta o nome da fita, que podera 
ter ate 1 2 caracteres quaisquer, compreendidos entre o espaco 
(c6digo 32) ate" o simbolo delta (codigo 127), conforme mos- 
tra a pagina Dl do manual do TK90X. A seguir, ele solicita o 
numero de serie da fita na fitoteca, o qual pode ir de 1 a 999. 
Informados estes dados, sera impressa uma capa na forma da 
figura 1 . 

A opcao 2 imprime uma lista padronizada para anotacao 
dos conteudos das fitas cassete (figura 2). 

Na listagem do programa, os caracteres das linhas 260, 
290, 830, 850 e 860, que estSo entre aspas, s2o caracteres 
graTicos (UDGs). 

Escrito inteiramente em* B ASIC, o programa pordm utiliza 
alguns comandos PEEK estrategcos. 

Na linha 700, inicia-se uma rotina de ampliacao dos carac- 
teres do micro, a fim de criar o ti'tulo da fita. Esta rotina 
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•dos no nodO Q 



3 LET ip-135 

10 CL5 _ 

11 PRINT 



DIM f»t3) 



12 PRINT "f 



"* ROTULADOR DE FITAS 



GELSON DIA5 SHUT 



13 PRINT 
CAS5ETTE I 

14 PRINT 

4 

15 PRINT 
t»t*»«»»#t»" 

16 PRINT "■ 
S - 1965 #•'* 

17 PRINT "*»•*•««§**»»«•§*•**♦ 
»(■•*•••••*" __ .__■ 

100 PRINT AT 10,2, "E5COLHA OPCA 

Q. " 

110 BRIGHT 1 FLASH 1. PRINT AT 

13,3,"1";at ie.3;"a";AT I9,3;"3 

": BRIGHT 0: FLASH 

ISO PRINT AT 13,8, "- CAPA PARA 
CASSETTE'; AT 16,5,"- LISTfl DE CO 
NTEUD0";AT 19,5;"- FIH DO PROGBA 

130 LET Oi»INKEV». IF 0«<"i OR 

0t»"3-' THEN GOTO 130 

140 IF 0M"3" THEN STOP 

150 IF 0i»"2" THEN GOTO 900 

160 IF PEEK USR "*"o255 THEN F 
OR T-U5R "1" TO USR "U"-l: READ 
p. POKE r.p; NEXT r 

170 INPUT "NOME DA PITA *» (Mix. 

12 Cif»C t .) ",ni 

180 IF LEN -.•...". THEN PRINT 00, 
"NOHE INUALIDO" 50UND 1,1 GOTO 

170 

190 INPUT "NUMERO DA FITA "> <«* 

x .3 aifli to*) "; nun 

200 IF nUH<l OR r.ji" 999 THEN PP 
INT B0;-'NUMERO INUALIDO" SOUND 
1,1: GOTO 190 

210 LET kl>STRt nu» 

220 IF LEN St<3 THEN LET »«."0" 
+S«: GOTO 220 

230 FOR r-1 TO 3. LET r$tf) »CHR 
t (CODE S»<r>*104>. NEXT r 

240 PRINT PRINT "LIGUE A IHPP 

ES50RA E TECLE ENTER" INPUT 0| 

250 CL5 

261" " 



320 l_ET cpsi67- i.LEN n««2)«16 

700 FOR v»l TO LE" n» 

710 LET <*(CODE n« lv ' -32i #6*156 
16 

720 FOB C=e TO («*7 

730 LET IbPEER C 

740 POP b«l TO 16 STEP 2 

750 IF U/filoIUT 11/2) THEN PL 
OT (CP-bl.tP- PLOT KP-b'+l,lP 

PLOT 'CP-bt.lp-1 PLOT <CP-bl->l 
IP-l 

760 LET l=IMT (1/2) 

770 NEXT D 

775 uET lP-ip-2 

-30 NEXT C 

790 *.ET cpocp.16- LET ip-135 

600 MEXT v 

610 COP. CL5 

Ssa e 0O nsl TO 4 LPPINT TRB 0, 



HMi-QEH*-P)B&HHfiMftM-H 



H£ 3 S AT T~T_ . 

~|65~LP»IHT~"A«flAH6AaA AAA Annas** 
i,;Si^^^^;ifl- 

"S75"LPi5lN*"" LPRINT 

690 RUN 

900 BRIrfT PRINT "LIGUE A IHPP 
ESSOBA E TECLE ENTER" INPUT l« 

910 CLS 

920 PRINT "PITA HUH. * CONT 

EUDO LADO '* 

930 PRINT "■ •*■■■■■■■■ ■■■■■■■■■■ 
■ uhhihii"; PRINT PRINT "II 

N1CIO/ FIH I NOME DO PROGRAMA " 

940 FOR X ml TO 9 

950 PRINT "I I" 

960 PRINT "I / I 



60 FOR n»0 TO 21 PRINT AT n . 

§8889688888888988836*886888888 



270 next n 

!90 PRINT AT 2,li" C " , AT 3,1," 
",at *,i;" C ";«T 5.1;" C '";« 
T 6.1;" ";BT 7,1;- fi ";at 8,1; 
" b -;AT 9,1;" ";AT 10,1;" *|f 
§(I) , '* ";AT 11,1;" ";r»«2l;" ";ft 
T 12,1;" ";r»(3);" " 
300 PRINT AT 1,1;" - ; AT 13,1; 

310 FOR *■* TO 7: PRINT AT q,7; 



970 NEX T x 

980 COPY 

990 INPUT 'OUTRA LISTA ? (5/Ml 
";0t. IP 0I»"S" OR 01«"i" THEN L 
PRINT ■ LPPINT ■ LPRINT GOTO 9 

80 

iooo Pun 

1020 DATA 255,129,129.129,129,12 
9 , 129 ,255 . 255 , 153 . 153 . 153 , 153, 15 
3,153.255 ■255,255,27,27.27,27,3. 
0,195, 195, 255, 255, 19S. 195, 0,0, 3- 
3 .255 255.3.3.0,0,255.255,27,27, 
27.255,255.0,255,255: 12, 24, 48, 25 
5,555 .0,0,0,31,31,27,31,31,0 
1030 DATA 126,255,243,219,307,25 
5 , 126 .0,0, 196 , 198 , 255 . 255 , 192 , 19 
2 . 198 .£2-1 243 , 251 . 223 . 207 . 198 . 
0, 102.231 , 195, 2 19, 2 19, 2$5. 102,0, 
31.31,24,24,24 .255.255.0.95,223, 
219,219,219,251.115.0.126,255,21 
9.219.219.251,114,0.3,3.243,251. 
31 . 15 , 7 , . 102 . 255 , 219 , 219 . 219 . 25 
5,102,0,76,223,219,219,219,255 1 
26 .0 

1040 DATA 1,2, 4, 6, .16, 32, 64. 128,1 
28 .64.32,16.8.4,2,1 



Rotulador 

usa como referenda a tabela de caracteres do micro, que estrf 
na ROM a partir do ender^o 15616. 

Na linha 160, foi utilizado endere9amento indireto via 
USR "a" e USR "u"-l para que o programa possa rodar 
tanto em mdquinas com 16 Kb quanto nas de 48 Kb de RAM. 

APLICACAO 

Acredito que este programa lhe ser£ rnuito util. Sugiro que 
voce utilize nomes de modo a estabelecer o tipo de conteudo 
que cada fita possui. Eu utilizo nomes como Jogos 1, Dados 2 
ou Trabalho 1 . Trabalho 6 o nome que dou aos cassetes desti- 
nados a armazenar programas incompletos ou em desenvolvi- 
mento (tamb6m poderia ser Rascunho). 



Gelson Dias Santos possui conhecimontos da o/etrdnico a 4 atualmenta 
operador do computador Burroughs B6700, da Univarsidade Federal do 

Rio Grande do Sul. Eta possui um TK90X a sues a'reos da interesse sao 

a computacto grifica, talaprocassamanto a lazar alatr&nico. 



O f uturo, 
rtosso velho 
conhecido. 
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DEUS CR10U O SOM. VE SE NAO ESTRAGA. 

Se voce quet ter sos£ego nn escolha 
rie cabos para audio, em eleironica ou 
informaiica. exija Audioflex. 

Audioflex d usado na interligupao, 
a nival de audio, de infotmacoes deniro ou 
fora dos equipamentos. 

Tern excetentes caracten'siicas 
eletncas, porque sua qualidade 6 contfolada 
em toda linha do producJo. e e foito com 
o cuidado que sen som merece. 



to 

'k 



Cabos Especiais a S isle mas Ltda. 

BR 116/fcm 25 -Cx Postal 146-06800 -Embu, 
SP- Tel.; 01 1/4W 2433 Pobx Tele* 01 1/33234 
KMPL - BR ■ Telegramas P«eleaoio 



Zx81 Zx81 Zx81 Zx8 



Baguncinha 



James Vassalo Donadelli e Wilson Shiguemi Yamada 



Para quem deseja passar algumas ho- 
ras agradaveis e divertidas nos fins-de- 
semana, Baguncinha e realmente uma 
boa opcao. 

Junte a familia ou os amigos, escolha 
alguem para desafiar e faca-o fundir a 
cuca com seu desafio. 

Como o prdprio nome ja diz, o pro- 
grama e uma brincadeira em que o mi- 
cro, fazendo o papel de baguncador, 
troca de ordem todas as letras de uma 
palavra deliberadamente colocada. E ele 
faz isso tSo bem feito que ate" voce, o 
desafiante, ficara impressionado com o 
resultado. 



16514. 


97 


A7 


R6 


AC 


BR 


B3 


AS 


AE 


16522 


63 


RD 


R5 


97 


38 


34 


Kb 


39 


16530 


3C 


26 


37 


2A 


Be 


87 


3E 


2 = 


16538 


ie 


3 ^ 


IB 


PM 


34 


an 


2b 


ci'J 


15546 


2A 


3 J 


31 


Pr 


00 


oc 


00 


3C 


16554. 


IB 


38 


IB 


■'■i- 


= c 


ay 


Ub 


29 


16562 


25 


ttfl 


:•.: 


t>h 


02 


an 


OU 


4.0 


16578 


09 


54 


5D 


01 


B5 


Ori 


2H 


0C 


16573 


4.0 


09 


r; 


63 


C9 


2H 


0U 


4.0 


16586 


E5 


11 


-' i 


00 


: - 


l>i 


01 


DS 


1659* 


02 


EC' 


612 


C9 
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Listagem I 

Como nSo vimos nada parecido pu- 
blicado por MICRO SISTEMAS, resolve- 
mos compartilhar essa diversao com 
voces, usuarios da linha ZX81, que pos- 
suem um micro com no mi'nimo 16 Kb 
de RAM. Por outro lado, esse mesmo 
programa podera ser rodado em outros 
equipamentos, bastando fazer as altera- 
c8es necessarias, pois tern como rotina 
principal as linhas que vao de 530 a 
640. 

OJOGO 

Enquanto se apresenta, o programa e 
auto-explicativo. 

Apos ter digitado a palavra e teclado 
NEW LINE, o micro a apresentara, 
ainda em sua forma original, acima da 
linha central do video para que o desa- 
fiante se certifique de have -la digitado 
corretamente. Em seguida, o programa 
entra em FAST para retornar com a 
mesma palavra totalmente ininteligi'vel. 
Para finalizar, aqui vao algumas dicas: 

1 - Os participates poderao combi- 
nar entre si, antes do ini'cio, a classifica- 
cao das palavras a serem adotadas (ex.: 
so verbos, nomes, substantivos, etc.). 
2—0 jogo torna-se muito interessan- 
te quando se coloca uma palavra com- 
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posta (separada por hi'fen ou espaco). 
Experimentem com MICRO SISTEMAS 
e vejam o resultado. 

3 - Podera ser cronometrado um 
tempo entre uma letra e outra para que 
o desafiado nao demore muito. 

O PROGRAMA 

Para iniciar a digitacao, crie uma li- 
nha REM com 84 caracteres quaisquer. 
Depois, com a ajuda do Micro Bug ou 
o Monitor Assembler (MS n? 23), de 
entrada aos codigos hexadecimais da lis- 
tagem 1. Terminando essa fase, digite 



a listagem 2, em BASIC. 

Para finalizar, de uma boa conferida, 
prepare o gravador e comande, via te- 
clado, GOTO 1020. 

Bom divertimento. 



James Vassalo Donadelli e Wilson Shiguemi 
Yamada, sao T6cnicos Agrimensores formados 
pelo Coligio TtScnico de Jundiaf, Sao Paulo. 
Atualmente, trabalham na irea de construcao 
civil utilizando calculations programiveis. 
Eles ainda sao usudrios do TK85, onde desen- 
volvem programas para a Area de engenharia 
topogrifica e tambim para lazer. 



10 REM (84- CARAC. QUA ISSUER ' 
20 PRINT AT 1,0; "' 




>BPGUNCINHA E 
MUITO SIMPLE 



>5EM QUE 



30 GOSUB 230 

40 PRINT AT 1,0 
• UMA BRINCADEIRA 
8 E DIUERTIDA" 

50 GOSUB 290 

60 PRINT AT 20.0;">ESTE JOGO E 
"OrSPUT RDQ ENTRE 2 PES50RS: 33 

- GOSUB 230 
80 PRINT AT 1,0; " 
5AFIAD0 UE-JA, 
IGITA UMA PALAURA 
X. 16 LETRAS J E N.L . 
90 GOSUB 290 

100 PRINT AT 20.0; 
R SE ENCARREGARA" 
A 1 -LA" 

110 GOSUB 230 

120 PRINT AT 1,0; " 

CABE A TAREFA DE 
SA PALAURA, DIGITAN DO UMA LETRA 

CADA UEZ E NEl-ILINE" 

130 GOSUB 290 

14.0 PRINT AT 20,0;" 
R. F Qgj R - PE P05ICA0. 

150 GOSUB 230 
160 PRINT AT 1,0: " 
R T A M - 5 E" 
170 GOSUB 290 
180 PRINT AT 19,0 



OUALOUER 



>0 COMPUTADO 
DE EMBARALH 



:A0 DESAFIADO 
DESCOBRIR ES 



A CADA LETR 
DARA" AO 91 



D I 



190 PRINT AT 11.4.; "PA RA INICIAR 
TECLE <B> Efi 

200 IF NOT INKEY$="B" THEN GOTO 
190 

210 CLS 
220 GOTO 350 
230 FOR X = l TO 150 
24.0 NEXT X 
250 FOR X=l TO 16 
260 RAND USR 16564. 
270 NEXT x 
280 RETURN 
298 FOR X=l TO 150 
300 NEXT X 
310 FOP. X = l TO 15 
320 RAND U5R 16533 
330 NEXT X 
34-0 RETURN 
350 PRINT AT 7,0; ' 
IGITE UMA PALAURA" 
360 PRINT AT 15,0. 



370 INPUT At 

375 -IF LEN A$> 16 THEN GOTO 370 

380 DIM PS (LEN AS' 

390 FOR K=l TO LEN AS 

4.00 LET PS(K)=AS(K TO K) 

410 NEXT K 

420 LET E=PI-PI 



430 FOR K=l TO LEN AS 

440 PRINT AT 14,E;PS<K); 

450 LET E=E+2 

460 NEXT K 

470 FOR C=l TO 30 

480 NEXT C 

490 PRINT AT 7,0; J" 

500 PRINT AT 14,0;"' 

510 FOR F = l TO 10 
520 NEXT F 

530 REM ROTINA DA TROCA 
540 DIM LiLEN AS) 
550 FAST 
550 RAND 

570 LET Ltl)=INT (RND*LEN AS) +1 
530 FOR X=2 TO LEN AS 
590 LET L(X"=INT (PND*LEN AS>+1 
600 FOR V=l TO X-l 

610 IF L(X)=L(Yi THEN GOTO 590 
620 NEXT l' 
630 NEXT X 
640 5LQI.J 

550 FOR C=l TO 10 
650 NEXT C 
570 LET E=PI-PI 
630 FOR K=l TO LEN AS 
690 PRINT AT 14 , E: PS (L (K) > 
700 LET E=E+2 
710 NEXT K 
720 LET Z=PI/PI 
730 LET S=Z 
740 LET D=PI-PI 

750 PRINT AT 7 , 0; " DESAFIADO : AD 
IVINriE ESTA PALAURA" 
750 INPUT US 

770 IF LEN US>1 THEN GOTO 760 
730 IF W(=P$(Z! THEN GOTO 860 
790 PRINT AT 13,0; "NAO E">";US; 

.380 FOR = 1 TO 25 

310 NEXT 

820 PRINT AT 16,0; " 

330 PRINT AT 19,0;"EPROS: ";5 

340 LET S=S + 1 

850 GOTO 750 

360 PRINT AT 16.D;PS(Z); 

870 IF Z=LEN AS THEN GOTO 910 

330 LET D=D+2 

890 LET Z=Z + 1 

900 GOTO 760 

910 PRINT AT 7,0; "^ 

920 FOR F = l TO 12 ms— 

940 PRINT AT §'i 10; "*PARABENS» 
950 NEXT F 

960 PRINT AT 21,0; "TECLE <.B ■■ PR 
RA OUTRA PALAURA" 
970 PRINT AT 21.6; "^M" 
930 IF INKEYS="" THEN GOTO 960 
990 IF NOT INKEYS="B" THEN STOP 

1000 CLS 

1818 GOTO 350 

1020 SAUE "BAGUNCINHB" 

1030 RUN 
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trs-80 trs-80 trs-80 trs-80 



Eduardo Andrade Lima 



Videocop foi desenvolvido em Assembler num TRS-80 
modelo I com uma impressora Epson MX-80, podendo ser exe- 
cutado em computadores compatfveis. Seu objetivo e fazer 
uma copia do video para a impressora. Qualquer carater, seja 
ele grafico ou alfanumerico, sera copiado respeitando a sua po- 
sicao na tela. Isto e, se o carater estiver situado na metade de 
uma linha na tela, ele ficara na metade de uma linha na impres- 
sora. 

Se voce possui o NEWDOS/80, este programa produz o 
mesmo efeito das teclas JKL quando tecladas simultaneamen- 
te, porem com a vantagem de poder rodar no LEVEL II BA- 
SIC, dentro de programas e, inclusive, em Sistemas Operacio- 
nais (DOS). 

Quando desejar interromper a copia, tecle < BREAK >, 
o que ocasionara a finalizacao do programa. 

Voce pode mudar a origem do programa (linha 170) pa- 
ra qualquer lugar da RAM, de acordo com as suas necessidades 
e com seu equipamento, desde que tome cuidado para nao co- 



AGORA VOCE PODE LIGAR 

QUALQUER IMPRESSORA 

PAR ALE LA AO SEU CP-400 



COMiWCAQAO 
OUTftO 
PEBIFfRlCO serial I 



CO'-'UTAOOR SEIMAl 



& 



MIC COCO WPUTAOOR 



IMPOESSOHA 



o 




OESENHO ESOUEMATiCO DE UMA OAS UGACOES POSSlVEIS 



CONVERSOR 

SERIAL/PARALELO 

Agora voce pode ligar todas 
as impressoras paralelas do 
mercado ao seu micro O 
Conversor Serial/Paralelo per- 
mile a voce conectar qualquer 
impressora paralela (padrao 
cetronics- a saida serial do seu 
micro com a vanlagem de, 
com um simples toque, acio- 
nar tambem qualquer periferi- 
co serial, sem a necessidade 
de Iroca de cabos. 

Mk~rn Fmi?n^nipn?~*: 

Produtos e Projetos Eletronicos Ltda. 
Rua Pedro Teixeira, 13 
04550 - Sao Paulo - SP. 

» VENDA TAMBEM NA: 

• CINOIICA: (Oil) 35 6961 . CITY MICRO'S: (0111 S32-MM 

• CLARITHON: (0111 2107M1 • FILCRES: 10111 223-73U 

• NO RIO: MIKROS (021) 205-4340 (INFOSH0PPINQ) 

ESTAMOS CADASTRANOO OISTRIBUIOORES 



COMUTADOR SERIAL 

O Comulador Serial e um 
oulro aparelho que permile a 
voce duplicar a saida serial do 
seu micro Com ele voce po- 
der? conectar dois peritencos 
a saida serial do seu micro, ao 
mesmo tempo. E para utiliza- 
los basta girar o botao. sem 
aquela incomoda operacao de 
troca de cabos. 

Usando em conjunlo 

estes equipamenios. voce 

node dgar. porexemplo uma impressora 

paraleia. um Modem e qualquer 

oulro peritenco serial de sua escolha 



p ara esciarecer qualquer 

uuvida ou conhecer 

"ossa linha compieu 

de Cabos Penlencos 

esollware.liguepaia 

(011)533-2326 

5 """""""■"•loao 
|c'ienie-o ue5e , e>a . nos 



Videocop 



loca-lo em regi5es usadas por outros programas que estejam 
sendo rodados paralelamente. 

Devido a grande versatilidade do Videocop, vale a pena 
perder dez minutos e digita-lo, pois este podera economizar 
horas perdidas na elaboracao de listagens e graficos na impres- 
sora. 



7D0O 
7DOO 
3COO 

7D0O DD2100 
7D04 010004 
7D07 2640 
7D09 3EOD 
7D0B CD3B00 
7D0E DD7E00 
7D11 FE1F 
7D13 DC617D 
7D16 FE1F 
7018 CC537D 
7D1B FE20 
7D1D CC537D 
7D20 FE7F 
7D22 CC337D 
7D23 FE80 
7D27 CC537D 
7D2A FECO 
7D2C D4S37D 
7D2F FEB1 
7D31 D4567D 
7D34 CD3B00 
7D37 DD23 
7D39 25 
7D3A 0B 
7D3B 78 
7D3C Bl 
7D3D FEOO 
7D3F CA647D 
7D42 7C 
7D43 FEOO 
7D45 CC597D 
7D48 3A403H 
7D4B CBS7 
7D4I) C2647D 
7D50 C30E7D 
7DS3 3E20 
7DSS C9 
7D56 C620 
7D5B C9 
7D59 2640 
7D5B 3E0D 
70SD CD3B00 
7D60 C9 
7061 C640 
7D43 C9 
7D64 3E0D 
7D46 CD3B0O 
7D69 C9 
7D00 
OOOOO TOTAL 



OOIOO ! 

00110 ; 

OO120 ; 

00130 ; 

0014O ; 

OO150 | 

00160 ; 

00170 

00180 1NIC10 

00190 VIDEO 

00200 

00210 

00220 

00230 

00240 

002S0 LOOP 

00260 

00270 

002BO 

00290 

00300 

00310 

00320 

00330 

00340 

003S0 
00360 

00370 
00380 
00390 
00400 
00410 
00420 
0O43O 
00440 
00450 
0046O 
00470 
00480 
00490 
OO500 
00510 
00520 
00530 
00540 
00350 R0T1 
00360 
00370 R0T2 
00380 
00390 P.0T3 
00600 
00610 
00620 
00630 ROT 4 
00640 
00650 FIM 
00660 
00670 
00680 
ERRORS 



***« *«**«*« . 

« VIDEOCOP / DID - VERSAO 1.1 « 
» * EDUARDO ANDRADE LIMA + * 

* CAIXA POSTAL > 34.022 « 

« CEP 22.472 / RIO DE JANEIRO * 
« TRS-80 MOD. 1 E COMPATIVEIS « 
. .,....,, . , 



ORG 

EOU 

ECU 

LD 

LD 

LD 

LD 

CALL 

LD 

CP 

CALL 

CP 

CALL 

CP 

CALL 

CP 

CALL 

CP 

CALL 

CP 

CALL 

CP 

CALL 

CALL 

INC 

DEC 

DEC 

LD 

DR 

CP 

jr 

LD 

CP 

CALL 

LD 

BIT 

JP 

JP 

LD 

RET 

ADD 

RE r 

I.S 

LD 

CALL 

RET 

ADD 

RET 

LD 

CALL 

RET 

END 



7D00H 

* 

3C00H 
IX, VIDEO 

BC, 1024 

H,64 

A, 13 

3BH 

A, <IX) 

1FH 

C.R0T4 

1FH 

2,R0T1 

20H 

Z.ROTl 

127 

Z.R0T1 

128 

Z.R0T1 

OCOH 

NC.R0T1 

129 

NC,R0T2 

3BH 

IX 

H 

BC 

A.B 

C 

0011 

Z.FIM 

A.H 

OOH 

Z.KUI 5 

A. (3840H) 

2, A 

NZ.FIM 

LOOP 

A,20H 

A, 32 

H.64 
A. 13 
3BH 

A, 64 

A, 13 
3BH 




FIM 7D64 00650 
INICIO 7D00 00180 

LOOP 7D0E 00230 
7D53 00530 
7D36 00570 
7D59 00590 
7D61 00630 
3C00 00190 



R0T1 
R0T2 
R0T3 
R0T4 
VIDEO 



00470 00330 

00680 

00340 

00290 00310 00330 003SO 00370 

00390 

00300 

0027O 

00200 




ENERGIA DE 
EMERGENCIA PARA 
MICROCOMPUTADORES 



Videocop 



Eduardo Andrade Lima esta" terminando o segundo grau no Colcgio 
Santo Agostinho, Rio de Janeiro. 




ESTEV0CEJAC0NHEC1A 
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GERATRON sempre foi a 
solugao ideal e economica para 
alimentagao de emergencia de 
microcomputadores da linha 
Apple e TRS-80. 

Agora voce tern disponivel o 
GERATRON PC 500. Com 
potencia de 500VA nominal e 
1 500VA de pico e dotado de 
chave de transferencia estatica 
e sincronizada, o GERATRON 
PC 500 garante o 
funcionamento ininterrupto dos 
micros compati'veis com 
IBM-PC, na configuracao mais 
completa, durante varias horas 
apos a falta de rede eletrica. 

Mas se voce precisa de mais de 
500VA, a GUARDIAN tambem 
dispoe do modelo 750. 



GERATRON e marca 
registrada da GUARDIAN, 

EQUIPAMENTOS ELETRONICOS LTDA, 

MATRIZ 

Rua Dr. Gamier, 579 - Rocha 

CEP 20971 - Rio de Janeiro - RJ 

Tels.:Geral (021) 261-6458 

Vendas: (021) 201-0195 

Telex: (021) 34016 

FILIAL 

Alameda dos Ubiatans, 349 

CEP 04070 - Sao Paulo, SP 

Tel.: (01 1)578-6226 




GUARDIAN 



ENERGIA A TODAPROVA 



zx spectrum zx spectrum zx spectrum zx spec 



trs-color trs-color trs-color trs-col 



Modificando caracteres 



Felipe Oriente 



Jesus, Alegria dos Homens 

Marcus Porto Pereira 

Este programa, para a linha TRS-Color, executa a musica execucao da miisica. Ao final da listagem estao as linhas res- 

"Jesus, Alegria dos Homens", tema do coral da Cantata, de ponsaveis pela reproducao do som (de 380 a 420), e na linha 

/. 5. Bach . 430 encontra-se uma rotina de espera. 

As linhas de n° 10 a 70 apresentam o programa; na linha 

80 existe urn POKE de velocidade (que pode ser retirado); e Marcus Alexandre Porto Pereira 6autodidata em BASIC e usuirio dos 

as linhas de 90 a 130 produzem a tela visualizada durante a micros cp 400 e Coior-64. 



Este programa serve para modificar o banco de caracteres 
de microcomputadores compativeis com o ZX Spectrum (TS 
2068 e TK90X). 

Para usa-lo, basta junta-lo ao seu programa com o comando 
Merge ou entao digitar seu programa entre as linhas 1 e 9679. 

Se, entretanto, o seu micro so possuir 16 Kb de memoria, 
entao faca as seguintes alteracSes: 



linha 1 : substitua os dois 249 por 124 
linha 9680: substitua 48384 por 16384 
linha 9685 : substitua 63744 por 3 1 744 



Felipe Oriente cursa atuatmente o segundo grau no Colegio Pio XII, em 
Sao Paulo. Ele possui um ZX Spectrum ha" urn ano, com o qual desen- 
volve programa s. 



1 POKE 


23607,249-. GOSUB 9680. 


9775 


DATA 


'£ " 


, 0,0,60 , 64,56,8, 120 


9895 DATA 


'P" 


,B, 60, 66, 70, 120,64, 


POKE 2362 


7 , 249 


,0 








32 ,0 






3679 STOP 




97SO 


DATA 


' t " 


,0, 16,56, 16, 15,20,2 


9900 DATfi 


■0" 


,0,18,76,66,74, 50, 1 


9680 uET fa 


=43334: FOR i =15616 TO 


4,0 








4,0 






16333 POKE (i+b),PEEK i: NEXT 


9735 


DATA 


*U" 


, , , 36 , 68 , 68 , 100 , 2 


9905 DATA 


.p.. 


,0,60,86,70, 120,68, 


* : 




6 .0 








34 ,0 






9585 FOR i 


= 1 TO 62; READ 3$: LET 


9790 


DATA 


■M" 


,0,0,72, 68,40,40, 16 


9910 DATfi 


,.y, 


,0,56,64,60,2,50,12 


adr "63744+SiCODE^al 


,0 








,0 






9590 FOR i 


=0 TO 7: READ a : POKE 


9795 


DATA 


'X" 


,0,0,72,40,16,40 ,36 


9915 DATA 


.. | ., 


,0,124 , 144, 144, 16, 1 


ad r + j , a : N 


-XT j : NEXT i 


.0 








5,8,0 






9595 DflTfi 



9700 DflTfi 


"a", 0,0,56,3 ,56,72,52, 


9300 

56 

9805 


DATA 


,y, 


,0,0,36,36,68,56 ,4, 


9320 DATA 

,0 

9925 DATA 


"U" 


,0,4,68,68,66,66,58 


" b" , , 16 , 32 ,60 , 36 , 34 , 6 


DATA 


"l(J " 


,0,0,8,68,34,84,40, 


,y„ 


,0,4, 100,66,66,36,2 


3 













4,0 






9705 DftTft 


■C" , 0,0,24,36,32,43, 12 


9310 


DATA 


"7." 


, 0,0, 60, ~2, 16,36 , 12 


9930 DATA 


'X" 


,0,72,38,24,24, 36, 1 


.0 




0,0 








3,0 






9710 DflTfi 


'd" , 0,3,4,60 ,36,68,60 , 


5320 


DATA 


"A" 


,0,56,36,66, 126,66, 


3935 DfiTfi 


"V" 


,0,2,68,40, 16, 16,8, 







34,0 















9715 DflTfi 


'6 ",0,0, 48, 76,88,95,00 


9825 


DATA 


•B" 


,0,14,34,121,66,70, 


9943 DfiTfi 


"U" 


,0,8,68,66,66,50,35 


.0 




28,0 








,0 






972C DATfi 


" >'" , , 28 , IS , 24 , 16 , 16 , 8 


9830 


DATA 


•C" 


,0,48,76,64,64,50,1 


9945 DATA 


" Z" 


,0,30,36,72,18, 36 . 1 


.0 




2,0 








20,0 






9725 DATA 


" 9 " , , , S6 , 44 , 68 , 60 , 4 , 


9,= ■:=. 


DATA 


"l>" 


,0,43,76,66,66,100, 


99S0 DATA 


" 1 " 


, , 24 . 40 , 40 , 5 , 10 , 60 


60 




24,0 








,0 






972' DATA 


"h" , 0,32,64, 63, 100, 63 . 


9840 


DATA 


„p. 


,0,60,64, 120,64,66, 


9955 DATA 


..p., 


,0,60,66,6, 56,66, 12 


3,0 




60 .0 








4 .: 






9729 DATA 


" i " , , 16 , , 56 , 16 , 16 , 5 , 


9345 


DATA 


,,p. 


,0, 62 ,64, /2, 112,64 , 


9960 DATA 


"3" 


,0,60,2,12,68,66,80 







32,0 








,0 






9730 DATA 


" J " , , 8 , , 4 , 4 , 4 , 52 , 24 


9850 


DATA 


,.,;.. 


, , 56 , 64 , 76 , 66 , 50 , 1 


9955 DATA 


"4' 


,0,8, 24 , 43 , 74,60,3, 


9735 DATA 


" S. " , , 64 , 32 , 40 , 48 , 40 , 3 


2,0 















5,0 




9355 


DATA 


"H" 


, , 63 . 66 , 122 , 70 , 66 , 


9970 DATA 


"b 1 


,0,126 ,64,60,2, 86,6 


9740 DATA 


"I ".0,32, 16, 16, 16, 20, 2 


34 .0 








0,0 






4,0 




9560 


DATA 


"!■ 


, , 23 . 10 , 10 , 40 , 40 , 2 


9375 DATA 


"b' 


,0,60,64,120,70,66, 


9745 DATA 


"61" ,0,0,40,34,84,84,60 


3,0 








60 ,0 






• 




9555 


PAT A 


■J 


,0,4,4,2,66,66 , SCO 


9330 DATA 


■"7' 


.0,60,86,4,8, 16, 16, 


9750 DATA 


"tv , 0,e, 56, 76, 68, 66, 35 


9570 


DATA 


"K" 


,0 .4,72, 112 ,72,68,3 









,0 




4,0 








33S5 DATA 


,. fi , 


, , 60 , 66 , 60 , 63 , 34 , 6 


9755 DATfi 


"0", 0,0, 48, 76, 68, 100, 2 


9S7S 


DATA 


"L" 


,0,64,32,84,64,66,6 


0,0 






4,e 




0,0 








9990 DATA 


„g, 


,0,60,66,114,14,2,6 


976e DATA 


"p" , 0,0, 120,68,72,120, 


9350 


DATA 


"M' 


,0,66, 102,90,66,65, 


0,0 






54 ,32 




8,0 








99*5 DflTfi 


■■J,. 


,0,28,100,74,82,102 


9765 DOTS 


"<T, 0,0, 56, 44, 63, 60, 4, 


9855 


DATfi 


"N" 


, , 72 , 100 , 82 , 74 , 33 , 


.56 . 






3 




1S,0 








9996 RETURN 




9770 DATA 
.0 


" r •' , O > , 12 , 43 , 32 , 32 , 1ft 


9890 
2 ,0 


DfiTfi 


-ir 


,0,48,76.66,66,50, 1 









Caracteres 



jrry 

erro 

■ Em MS n? 55, na materia "CBBS: 
a informacao via computador", pag. 
11, o telefone do ABBS Atari saiu 
errado. numero correto 6: (011) 
454-7557. 



■ Em MS n 9 52, no programa "Micro- 
golf", pag. 48, faltou a linha 125 da 
listagem. A linha e a seguinte: 

125 GOSUB 1010 

■ Em MS n? 55, no artigo "Mensa- 
gem de Erro no Color", pag. 48, na 



quinta linha do quarto paragrafo, 
houve um erro de impressao. O certo 
6: ". . .sera" exibida. Uma outra opcao, 
ao inves de limpar a tela e listar a linha 
de erro, seria acionar a rotina EDIT, 
colocando automaticamente tal linha 
em modo de edicao. . .". 



.*■-. 



10 


'MARCUS ALEXANDRE 






20 


"NITEROX-RJ 








30 


::ls 








40 


"' R 1 N T '" « «• « «• -K- « * K- « 


( •)(• K- 


*■){-■}(•)(■■)(••)(-•)(••)(•«• 


•)(•«•)(• 


<••)(•>(••)<••)(••)(•" 








50 


»RINT832,"i" 








60 

LI f'\ M 


>RINTaiOO,"JESU 

'■' K\ (;:■ >'' 


3, A 


..EGRIA 


DO 


I 1 U I * 

70 


.. IN o 

3 RINT<ai3Q,"TEMA 


DO 


CORAL 


DA 


ANT 


ATA 147" 








80 


3 RINTffl216„'"J.S. 


JACH" 




90 


:) RINT«)224 "kkwwmwk 


K- •)(•*■« •)(-«■ • 


\ -j(- ■)(• 


-H- •)(- ¥: K rt •>!• » M )(•')!• •)(• •)(• «■ « " 








1 00 


POKE 65493,0 








1 10 


CLEAR 








120 


PM0DE2,! 








130 


COLOR 0,3 








140 


POLS 








150 


00 SOB 250 








160 


LINE (28, 60)- (2 


24, 


60) ,PSI 


•T , 


170 


LINE (28 ,120) •-( 


224 


,60),p: 


SET 



» ■)(• 



■X--K- 



,B 



1 8 I... T N E ( 8 4 , 6 ) - < 3 4,120), P 6 E T 

1 90 L INE < 56 , 060 ) •■■■ < 56 , 1 20 ) , P SET 

2 L I N E (112,60) •- ( 1 1 2,12 ) , P S E T 

2 i I... I HE C 1 4-0 , 60 ) - ( 1.40 , 1 20 ) „ P SET 

2 2 I... I N E < i 6 ,60) - < i 6 3 , 1 2 ) , P S E T 

2 3 !.. I HE (196,60) - (196,120), P S E T 

2 4 I F I N K E Y $ ■■■■-■ " 1 " T H E N 3 5 E L 8E 2 4 

250 ft«l 

260 PORF-A TO A+8 

270 i ... I N E ( S2 + F ,60) •••• ( 52 + F , 9 6 ) , P S E T 

230 NEXTF 

290 A--A+28 

300 IFA<l60rHEN26t3 

310 A~ 108! 8 ==116 

320 F0RF»A TO B 

330 L I HE ( F , 60 ) •••• ( F , 96 ) , P R ESET 



340 NEXT s RETURN 

350 SCREEN 1,1 

360 DRAW'S M23 , 140 - R6 ; N ■; R5 y D10 p L3 

j 01 j L2 p BM46 , 143 - 1...5 » D3 - N ; R4 - D4 « R5 

•■ BM60 , 143 » I...7 s 04 pRSj 03 ; I...5 yBM64. 14 

3 - 07 - R 6 ;: 07 ; BH83 , 1 43 - L7D4R 6D3I...6 •- B 

H86,152 ? Ny02 i ;DlH-l // 

370 DRAW'S M65 ,164- 01 ? R6 jD5 jN$ L6 

9 D5 p BM76 , 1 56 - D8 - R6 y B M94 ,157? I...5 ; D 

3 j N « R 4 - D4 » R 5 j BM .1. 07 , 1 57 y L6 ; D7 y R 5 y 
03? N 5 LI y R 1 y BH1 12 , 164 p 07y R6 y D3y L4 

; D2;R2yi.)2yR3yBM124,164yU7yBM130, 
1 6 4 y 7 p R 6 t D 3 y N y I... 6 j D 4 " 
330 DR AW'B M 1 24 , 178 - U 1 - R 6 - D 1 y R 1 ■ 
Dl ; Rl y D6 - Li ; 01 y Li yDi - 1...3 y BM138 , 17 
8 ? U8 y R 5 ? 08 y LS y B M 1 49 , 178 y R5 y 03 y L5 

sU5"R5" 

390 ' DRAW'S Mi 38 , 1 32 y D5 y N - D6 - R6 - N y 
06 y US y B M 1 5 1 , 1 35 y 07 . R 5 - 07 y L5 - B Mi 6 
2 , 134 y N p 07 p R4 p 04 y R4 9 U4;R4 y 07 p BMi 
36 , 184 y L5 y D8 y N p R4 y 05 y R3 y BM192 , 18 
4 y N ; D7? R3?Di pRl jDl pRl ; 01 $ R 1 - Di pR 
2 y D3 y 07 y BM212 , 134 - L5 y D3 y R5 y 04 p LS 

4 Q P I... A Y " V 8 1 T 4 1... 4 2 A B 3 D C C E D D G F # 
D 28 A B 3 C D E D C 2 B A B G " 

4 1 P I... A Y " V 3 1 r 4 i... 402 i :: ' « G A D F tt A 3 C O 2 B 
A B GAB 3 D C C E D G P « G D 2 B G A B E 3 D C 2 B 
AGDGFtt" 

420 PLAY / 'V3iT4L402GB03t)GD02BGB<)3 
i :: ' D 2 B G B 3 D E C 2 A F ** A 3 C D 0.2 B G E G B 3 
C02AF»DF#A03C02BA" 
430 PLAY"V3iT4L402BOAB03DCCEDDGF 
U G D 2 B GA B 30 D E D C 02 B A B G F H 6 A DF H A 03 
G02BA" 

440 PLAY"V3iT4L402B0AB03DCCEDDGF 
ti G D 2 B G A B E 3 b C 2B A D (3 F ti 2 1... 2 . 6 " 
• 450 I F I N l< E Y «S = " " r H E N 4 3 EL. S E G T 3 



Jesus Alegria dos Homens 



MICRO SISTEMAS, junho/86 



45 



apple apple apple ap 



Robert Pagnot 



Este programa, que roda em micros compati'veis com o 
Apple II, com disk drive, e composto de duas partes: uma em 
Applesoft e outra em Assembler. A primeira, referente a lista- 
gem 1 , trata de todas as rotinas de insercao, correcao, listagem 
e gravacao em disco de miisicas. Observe sua estrutura: 
10 - 30 iniciac5o do programa; 

50 rotina de erro; 

100 — 210 rotina para processamento de dados; 

300 rotina para tocar a musica; 

400 - 490 rotina para entrar a musica via teclado; 

500 - 620 rotina para gravar a musica no disco; 

700 — 800 rotina para correcSo de dados; 

900 — 990 rotina para entrar a musica via disco; 

1 100 — 1 190 rotina de listagem no video/impressora; 
1200 - 1340 rotina para inserir/acrescentar notas; 
1400 - 1460 rotina para apagar notas; 
1500 — 1560 rotina para guardar dados na mem6ria; 
1600 - 1750 rotina para menus; 
2000 - 2080 inicializac3o geral do programa; 
2 1 00 - 2 1 40 menu principal ; 
2200 - 2270 menu de modificacOes. 

J a o bloco em Assembler y. 6502 (listagem 2) trata somente 
da reproduc5o das miisicas. 

Para digitar a parte em Applesoft, primeiramente, tecle 
NEW e CR ; so entao inicie a digitac3o da listagem 1 , linha por 
linha, e depois confira-a. A seguir, digite SAVE MUSICA para 
gravar o programa no disco. 

Na hora da digitac3o do Assembler, tecle CALL -151 e en- 
tre no monitor. Depois, inicie a digitacao da listagem 2 confor- 
me o modelo: 

"300: AD 60 6D C9 03 DO 01 60... 4C 00 03 e 'CR' 

*34B :BD 00 03 C9 FF DO 09 FE. . . ate o final e 'CR' 

Confira a listagem em Assembler e depois digite 3D0G para 
voltar ao BASIC. Grave a rotina Assembler usando BSAVE 
RM,A$300,L$5F. 

RODANDO O PROGRAMA 

Digite RUN e aguarde um momento. Se tudo correr bem, 
sera apresentado um menu de opc5es tipo Magic Window. Mo- 
vimente o cursor usando «— , — ♦ ou ainda tecle o niimero da 
opc3o e 'CR' ou entao outra vez o niimero da opcao, para acei- 
tar a escolha. Veja, abaixo, as opcOes: 

Entrar do disco - Sera perguntado se voce quer o diret6rio do 
disco ou n3o. Digite S para sim e N para n3o. A seguir, o pro- 
grama lhe pedira o nome da musica ja gravada e carregara os 
dados, voltando ao menu principal ap6s terminada a operac3o. 
Entrar do teclado — Sera pedido o valor de um tempo (segun- 
do o metrdnomo — aparelho para marcar tempo), digite-o e, 
entao, inicie a musica. Em primeiro lugar, digite a nota, de 



Musica no Apple 



CLAVE DE SOL 

SfHBOLOS DE REPETICAO 
INC 

CLAVE DE CLAVE DE 

SOL FA 

DC-3 



CLAVE DE CLAVE DE 

SOL FA 

tt\ FA2 



LA2 




10 HIMEM: 28000 

20 ONERR SOTO 50 

30 POKE 34,0: POKE 33,40: TEXT : 

HOME : GOTO 2000 
30 POKE 34,0: HOME : PRINT CHR» 
(7): PRINT "ERRO "I PEEK (22 
2) f " NA LINHA "1 PEEK <219) * 
256 * PEEK (218): FOR I - 1 

TO 300: PSE - I: NEXT I: HOME 
: GOTO 2100 
100 HOME : VTAB 10: HTAB 10: PRINT 

"UM MOMENTO POR FAVOR" 
110 MM<1> = (N*(l) = "INC"):X ■ 2 

:Y ■ 1 
120 VL - V » ( - 2.73) ♦ 719 
130 FOR I - 1 TO N 
133 VTAB 1: PRINT II" 
140 DX(I) ■ DR(I) » VL / 16: IF N 

*<I) » "INC" THEN MM(X) - I: 

X ■ X ♦ l:DX<I> " l:CN7.(I) = 

1: GOTO 190 
150 IF N*(I) - "REP" THEN NN<Y) - 

I:v - V * l:D7.(I) - l:CN7.(I) 
= l: GOTO 190 
160 FOR J ■= 1 TO 57 
170 IF N*(I> ■ N1*(J) THEN CN7.CI 

) = N27. (J): GOTO 190 
180 NEXT 3 
185 VTAB 21: PRINT "ERRO NA NOTA 

■111 VTAB l: GOTO 2110 
190 NEXT I 
200 C «° Y:NN(V) = N + (N*(N> < > 

"REP">: GOSUB 1310: PRINT CHR* 

(7) 
210 RETURN 
300 POKE 769,96: POKE 770,109: POKE 

786,36: POKE 787,119: POKE 7 

91,232: POKE 792,128: CALL 7 

68: RETURN 
400 REM ENTRAR UMA MUB1CA 
410 HOME : PRINT "OIGITE 'FIM' P 

ARA TERMINAR": PRINT 
420 I - O: PRINT : INPUT "NOME DA 
MUSICA? "1NM»: PRINT : INPUT 

"DUAL VALOR DE UM TEMPO? " 

IV: PRINT 
430 1-1*1: PRINT II" "I 
440 PRINT "NOTA ?"!N*(I)|:A ■= LEN 

( STR» (II): HTAB 9 * A: INPUT 

""SA«: IF A« < > "" THEN N« 

(I) "A* 
450 IF N»(I> - "FIM" THEN N ■ I - 

1: RETURN 
460 IF NIIII - "REP" OR NIII) - 

"INC" THEN GOTO 430 
470 HTAB 3 ♦ A: PRINT "DURACAO ? 

"IDR(I>|: HTAB 12 * A: INPUT 

""IA»: IF A* < > "" THEN DR 

(I) ■ VAL (A«) 
480 HTAB 3 * A: PRINT "OBS. : "10 

87.(1) i: HTAB 9 «■ A: INPUT "" 

1A«: IF A» < > "" THEN 0BX< 

I> - VAL (A*) 
490 PRINT : GOTO 430 
300 REM GRAVAR A MUSICA 
310 HOME : PRINT "MESMO NOME ("I 

nm*i")? "i: input ""|E»: IF 

E» ■ "8" THEN 340 
S20 PRINT : INPUT "DIRETORIO (S/ 

N)? "IE*: IF E« = "S" THEN PRINT 

D*l"CATALOG" 
S30 PRINT : INPUT "NOVO NOME? "i 

NM* 
540 PRINT D*l"OPEN"INM»: PRINT D 

*I"DELETE"|NM»: PRINT D«; "OP 

EN"|NM»: PRINT D»; "WRITE"! NM 

* 
550 PRINT N: PRINT V: PRINT C: PRINT 

VL 
560 FOR I = 1 TO C: PRINT NN ( I ) : 

PRINT MM(I): NEXT I 
570 FOR I - 1 TO N 
580 PR'lNT N*(I): PRINT DR(I) 
590 PRINT CN7.(I): PRINT D7.(I): PRINT 

0B7. ( I ) 
600 NEXT I 

610 PRINT D*i "CLOSE"INM» 
620 RETURN 
700 REM CORRIGIR 
710 HOME : INPUT "OUER LISTAR ? 

"IE*: IF E* - "S" THEN E« ■ 

"": GOSUB 1120 
720 HOME 
730 PRINT : PRINT "UM TEMPO 

v: : HTAB 12: input ""ie«: 



740 
730 



: IF E* < > 

(E») 

INPUT "OUAL 

?"II 
VTAB 4: PRINT 



THEN V 



"! 

HOME 

VAL 



NUMERO DA NOTA 



NOTA: ";N*(I> 
(" ": PRINT "DURACAO: "!DR 

(1)1" ": print "OBS.: ":OB 



770 

780 
790 
800 

900 



930 

940 

930 
960 

970 
980 

990 

1100 
1110 



1130 
1140 



1150 
1160 
1170 



1180 
1190 

1200 
1210 

1220 

1230 

1240 

1250 
1260 
1270 



1280 
1290 
1300 



1310 

1320 
1330 

1340 
1400 
1410 



1420 
1430 
1440 



7.(1)!" ": VTAB 4: HTAB 7: INPUT 
""!E«: IF E« < > "" THEN N« 
( I ) = E« 

VTAB 3: HTAB 10: INPUT ""!£» 
: IF E« < > "" THEN DR(I) - 

VAL (E*) 
VTAB 6: HTAB 7: INPUT ""!E«: 

IF E* < > "" THEN 0BX(1) - 

VAL (E«> 
PRINT : INPUT "MAIS ALGUMA ? 
"IE* 

IF E* < > "S" AND E« < > " 
SIM" THEN RETURN 
HOME : VTAB 20: PRINT "ULTIM 
A NOTA: "ill" ": VTAB 1: GOTO 

740 

HOME : INPUT "DIRETORIO (S/N 
)? "IE*: IF E* = "S" THEN PRINT 
D* I "CATALOG" 

PRINT : INPUT "NOME DA MUSIC 
A ?"INM» 

PRINT D*l "OPEN":NM«: PRINT D 
«|"READ"|NM« 
INPUT N,V,C,VL 

FOR I » 1 TO C: INPUT NN(I), 
MM(I): NEXT I 
FOR I - I TO N 
INPUT N«(I),DR(I> 
INPUT CN7. ( I ) , D7. ( I ) , 0B7. ( I ) 
NEXT I 

PRINT D*i "CLOSE" !NM»: GOSUB 
1500: RETURN 

REM LISTAR DADOS 

INPUT "P/ IMPRESSORA? "IE«: 

IF E« - "S" OR E* » "SIM" THEN 

PR« 1 

HOME : HTAB (40 - LEN (NM* 
>> / 2: INVERSE : PRINT NM»: 

PRINT "UM TEMPO - "IV: NORMAL 
: FOR I - 1 TO 40: PRINT "-" 
i; NEXT : PRINT : POKE 34,3 

FOR I = 1 TO N 

PRINT II" NOTA: ";N»(I)C IF 
N»(I> - "REP" OR N»(I> - "IN 
C" THEN PRINT : GOTO 1170 

PRINT TAB( 18) I "DURACAO: " 
I DR ( I ) i 

PRINT 'TAB( 33) I "OBS. : "I0B7. 
(I) 

IF I / 20 - INT (I / 20) AND 
E* < > "S" THEN GET A«: HOME 
: IF Al • CHR» (27) THEN POKE 
34,0: RETURN 

NEXT I 

GET A*: POKE 34,0: HOME : RETURN 

REM INSERIR NOTAS 

HOME : INPUT "INSERIR OU AC 
RESCENTAR NOTAS (I /A)? " I E« 

IF E« - "A" THEN I - N: GOSUB 
430: RETURN 

HOME : INPUT "OUANTAS NOTAS 

HA' A INSERIR ?"INI 



"A' PARTIR DE 
"IPN 



PRINT : INPUT 

OUE NOTA (NO) 

IF PN > N THEN RETURN 

FOR J - N TO PN STEP - 1 
N*(J ♦ NI) - N*(J):DR(J * NI 
) o DR(J) :OB7.(J + NI) « OB"/.( 
J) 

NEXT J 

FOR T - PN * 1 TO NI ♦ PN 

PRINT : INPUT "NOTA? "|N*(T 
); IF N*(T) » "INC" OR N*(T> 

= "REP" THEN 1320 

INPUT "DURACAO? "IDR(T): INPUT 
"OBS.: "IOB7.(T> 

NEXT T 
N - N * NI 

RETURN 

REM APAGAR NOTAS 

HOME : INPUT "APAGAR NOTAS 
A PARTIR DA: "INC: INPUT "AT 
E A: "INF 
DI - NF - NC * 1 

FOR J = NC TO N 

N((J) - N«u * DI): 

R(J * DI):OB7.(J> 

I) 



:DR(J) 
0B7.(J 



1430 NEXT J 

1460 N - N - DI: RETURN 

150O HOME : VTAB 10: HTAB 8: PRINT 

"AGUARDE UM MOMENTO" 
1510 A = 1: FOR J = 1 TO C 
1520 FOR I = MM(J) » 1 TO NN(J) - 

I 
1525 IF N«(I) = "INC" OR Nft(I) - 

"REP" THEN 1540 
1330 POKE 27999 + A,0B7. (I): POKE 

30499 * A,CN7.(I): POKE 32999 
+ A,D7.(I) :A " A + 1 
1535 VTAB 1: PRINT II" " 



1540 NEXT I: NEXT J 

1550 POKE 27999 + A, 3 

1560 RETURN 

1600 ES - l: POKE - 16368,0 

1610 FOR J - 1 TO I 

1620 IF ES = J THEN INVERSE 

1630 VTAB 7 ' J: PRINT A*(J): NORMAL 

1640 NEXT J 
1650 E* = "" 
1660 IF PEEK ( - 163S4) < 12S THEN 

1660 
1670 IF PEEK ( - 16384) > 127 THEN 
E* = CHR* ( PEEK ( - 16384) 
- 128): POKE - 16368,0 
1680 IF E* - CHR* (27) THEN HOME 

: END 
1690 IF E* =■ CHR* (8) THEN ES ■ 

ES - l: GOTO 1730 
1700 IF E* = CHR* (21) THEN ES - 

ES ♦ 1: GOTO 1730 
1710 IF E* ■ CHR* (13) OR ES - 

VAL (E*> THEN RETURN 
1720 IF E* > "0" AND E* < STR* 
(I + 1) THEN ES = VAL (E«) : 
GOTO 1610 
1725 PRINT CHR* (7) 
1730 IF ES > I THEN ES - 1 
1740 IF ES < 1 THEN ES ■ I 
1750 GOTO 1610 
2000 D* ■ CHR* (4): POKE 28000,3 

2010 DIM N«(1000> ,CN7.(1000),DR(1 
000) , 0B7. ( 1000) , 07. ( 1000) ,N1* ( 
57)-,N27.(57),MM(20),NN(20) 

2020 IF PEEK (768) < > 173 THEN 
PRINT D*l"BLOAD RM" 

2030 RESTORE 

2040 DATA 248,234,221,209,197 

, 191, 185, 173, 163, 156, 147, 139 
,131, 128,123, 116, 110,103,97, 
94,92,87,82,77,72,68,64,63,6 
1 , 37, 34, 31 , 48, 47, 45, 42, 40, 37 
, 3S, 33, 32, 31 , 30, 29, 28, 26, 23, 
24,23,21,20, 19, 18, 17, 16, 15,1 

2050 DATA D03, D0S3.RE3, RES3.MI3, 
MISS, FA3, FAS3, S0L3, S0LS3, LA3 
,LAS3,SI3,SIS3,D02,DOS2,RE2, 
RES2, MI2, MIS2, FA2, FAS2, S0L2, 
S0LS2,LA2,LAS2,S12,SIS2,D01, 
D0S1,RE1,RES1,MI1,MIS1,FA1,F 
AS1,S0L1,S0LS1,LA1,LAS1,SI1, 
SISl,D0O,DOS0,REO,RES0,MI0,M 
ISO.FAO.FASO 
2060 DATA SOLO, SOLSO, LAO, LAS 

O.SIO.SISO.PAUSA 
2070 FOR I = 1 TO 57: READ N27. ( I 

) : NEXT I 
2080 FOR I ■ 1 TO 37: READ N1*(I 

) : NEXT I 
2100 HOME : REM MENU PRINCIPAL 
2110 PRINT NM*: PRINT : PRINT "' 
ESC PARA TERMINAR": A* (1) = 
<!>'ENTRAR DO DISCO 

":A»(2> - " < 

2>-ENTRAR DO TECLADO 

":A*(3> = " <3>-PR 

OCESSAR OS DADOS 

2120 A*(4) = " <4>-MENU DE MODI 

FICACOES/LISTAGEM ":A*(5) 

- " <3>-REPR0DUZIR A MUSI 
CA ":A*(6> - " 

<6>~GRAVAR NO DISCO 

": I » 6: gosub 16 

00 
2130 ON ES GOSUB 900,400,100,220 

0,300,500 
2140 GOTO 2100 
2200 REM MENU MODIFICACOES 
22 lO HOME 
2220 PRINT NM*: PRINT : PRINT "' 

ESC PARA TERMINAR" 
2230 I = 5:A«(1) = " <1>-RET0RN 

AR AO MENU PRINCIPAL 

:A«(2) = " <2>-LISTAR NOTA 

S: VIDEO/IMPRESSORA ":A*(3 

) = " <3>-C0RRIGIR DADOS 

":A*(4) » " 
<4>-INSERIR/ACRESCENTAR N 

OTAS " 

2240 A* (5) - " <5>-APAGAR NOTAS 

": GOSUB 

1600 
2250 ON ES GOSUB 2270,1100,710,1 

200, 1400 
2260 GOTO 2200 
2270 POP : GOTO 2100 
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Figura 1 

acordo com a figura 1 , e 'CR'. Ap6s, digite a duracao, segun- 
do a figura 2, e tambe'm as observacoes que podem ser ou 1 
(0 representa nota normal e 1, nota ligada a anterior, como no 
si'mbolo abaixo). 



S 



nota em 



ques 



em \ 
too ) 



Ao final da musica, digite FIM no lugar da nota e o progra- 
ma retornara ao menu principal. 



Processar dados - programa iniciara uma rotina que trans- 
forma suas notas nas dele. Apos, ele volta ao menu principal. 
Obs.: Depois de cada modificac3o ou digitacSo, deve-se obriga- 
toriamente processar os dados, o que n3o e necessario apos car- 
regar-se uma musica. _ 

Menu de modificacoes/Listagem — Sera apresentado um novo * 
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MUSICA NO APPLE 
















0300- 


AD 


60 


6D 


LDA 


S6D60 


032E- 


4C 


IF 


03 


JHP 


S031F 


0303- 


C9 


03 




CMP 


«03 


0331- 


A9 


OF 




LDA 


«0F 


0305- 


DO 


01 




BHE 


$0308 


0333- 


85 


07 




STA 


$07 


0307- 


ttO 






RTS 




033b- 


06 


OH 




DEC 


$08 


0308- 


C9 


01 




CHP 


«01 


0337- 


no 


EC 




b-:f 


$0325 


030A- 


FO 


Ob 




BEO 


S0311 


0339- 


A2 


01 




LDX 


«01 


030C- 


AS 


SO 




LDA 


|<S50 


033B- 


20 


4B 


03 


JSR 


S034R 


030E- 


20 


A8 


FC 


JSR 


SFCA8 


033E- 


A? 


12 




LDX 


«12 


0311- 


All 


24 


77 


LDA 


$7724 


0340- 


20 


4B 


03 


JSR 


$034B 


0314- 


65 


06 




STA 


S06 


0343- 


A2 


17 




LDX 


«17 


0316- 


AD 


£8 


BO 


LDA 


$80E8 


034b- 


20 


4B 


03 


JSR 


$034B 


0319- 


85 


08 




STA 


$08 


0348- 


4C 


00 


03 


JMP 


$0300 


031B- 


A9 


OK 




LDA 


*$0F 


034B- 


B!) 


00 


03 


LDA 


$0300, X 


031D- 


8b 


07 




STA 


$07 


034E- 


c» 


FF 




CHP 


»FF 


031F- 


AD 


30 


CO 


l.DA 


SC030 


0350- 


DO 


09 




BNE 


S03bB 


0322- 


88 






DEY 




0352- 


FE 


01 


03 


INC 


S0301 , X 


0323- 


DO 


04 




BNE 


$0329 


0355- 


A9 


00 




LDA 


]f$00 


0325- 


CO 


07 




DEC 


$07 


0357- 


9D 


00 


03 


STA 


$0300, X 


0327- 


FO 


08 




BEO 


$0331 


035A- 


60 






RTS 




0329- 


CA 






DO 




035B- 


FE 


00 


03 


INC 


$0300, X 


032A- 


DO 


re 




BNE 


$0322 


035E- 


60 






RTS 




03 2C- 


A6 


06 




LDX 


$06 
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menu que tera as seguintes opc5es: 

1. Retornar ao menu principal — retorna ao menu principal 

2. Listar notas - lista as notas na tela ou impressora 

3. Corrigir dados - pergunta se voce quer a listagem ou nao e, 
depois, o niimero da nota a corrigir. Voce pode corrigir diver- 
sas notas sem sair da rotina. 
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Figura 2 


= 4 


5 .25 






ssps 


— 2 


f - .125 




r — i 


jT = .0625 




' 


Jt -5 


r obs.: 1 









4. Inserir/Acrescentar notas - voce podera inserir notas no 
meio da miisica (sera perguntado quantas notas voce vai inse- 
rir e a partir de qual. Sua primeira nota ficara logo apos esta) 
ou acrescentar ao final da mesma. 

5. Apagar notas — apaga as notas a partir da nota X da primei- 
ra pergunta ate a nota Y da segunda pergunta, inclusive. 
Reproduzir a miisica — programa executara a miisica na sua 
memoria. 

Gravar em disco — lhe sera perguntado se voce quer gravar com 
o mesmo nome ou na"o. No caso de nao, sera perguntado se 
voce quer o diretorio (para evitar de gravar por cima de outra 
musica ja existente) e, a seguir, o novo nome. 
Obs.: Nas perguntas onde as respostas podem ser sim (S) ou 
nao (N), se voce teclar simplesmente 'CR\ o programa enten- 
dera como na"o (N). 

Se, durante o menu, voce digitar 'ESC, ocorrera uma inter- 
rupcao no programa e, para voltar a ele sem perder os dados, 
digite GOTO 2100;. Pode-se tambe'm digitar RUN, porem, pcr- 
dem-se os dados. 

Caso se deseje utilizar as musicas gravadas com este progra- 
ma em outros, na"o ha problema, mas deve ser salicntado que 
as sub-rotinas de reproducao (linha 300 e listagem 2), entrada 
do disco (linhas 900 a 990) c de arquivo na memoria (linhas 
1500 a 1560) devcriSo ser mantidas; as demais poderao ser 
apagadas ou substituidas. Porem, deverao ser dimensionadas 
as variaveis CN%, D%, 0B%, NN e MM (DIM CN%(1000) 
D%(1000), OB%(1000),NN(20),MM(20)), e ainda a linha 960 
devera ser modificada para 960 INPUT N$,DR. 

,-. 

Cursando atualmente o ultimo ano do segundo grau, na Escola Estadual 
Piratini, em Porto Alegre, Robert Pagnot estuda, ainda, programafao 
Assembler-Z80A —, na PUCRS, sendo tambe'm programador autodidata 
em Applesoft e Assembler H 6502. Trabalha na Bourscheid Engenharia. 
onde desenvolve programas na Area de engenharia e topografia. 





APLICATIV/05 rALAMDO P0RTUQUE5 



EDUCATIV05 rALAMDO PORTUQUE5 



JOQ05 EM0CI0MANTE5 



PROGRAMAS QUE VOCE EMTEMDE! 



' APLICATIVOS 

101 - COMTROLE DE E5TOQUE M5X 

102 - AQEMDA DE 

EMDERE<;05/MALA 
DIRETA M5X 

103 - FLArllLhA ELETROMICA M5X 

otilitArio 

201 - editor assembler/ 
d55a55embler m5x 

COLECAO PRlrlCIPIArlTES 

301 - PRIrlCIPIAMTE - E 

302 - PRIrKIPIAMTE - U 
505 - PRIrlCIPIAMTE - D 



i JOQ05 EMOCIOrtAMTES 

501 - KALEID05COPIO DIGITAL 

502 - M5 XADRE2 

505 - MAQUIMA QUEMTE 

504 - MI55A0: RE5QATE DO 5ATELITE 

505 - LABIRIMTO DOS DIAMAMTE5 

506 — BAMCO FAriTA5MA 

507 - VI5ITAMTE DO FUTURO 

508 - AVEMTUREIRO DO CAMPO MAQMETICO 



A VEMDA M05 REVEMDEDORE5 M5A 



RUA DO CATETE, 331 - QRUP05 1201 A 1204 - CEP: 22220 



DE TODO O BRA5IL. 



Rio de Janeiro - RJ - Tel.: (021) 221-1674 - C.P. 832/20001 




BTC05M 

Cz$ 2.413 



DIVERSOS 



INTERFACES 

Printer Card CCE 990 

Ram Card 16 CCE 1.290 

RS 2320 CCE 1.090 

Video Card 80 Col CCE 2.000 

CP/M Card CCE 1190 

Disc Card CCE 1.090 

128K CCE 1-990 

Paralela Loqodala 900 

128 Logodata 1-990 

RS 232 Logodala 1.090 



CP/M Logodala 1.090 

Inl Disco Logodala 890 

MONITOR 

MV 12 CCE 2-500 

Videocompo Verde 4.000 

Drive p/Apple 3-799 

SUPRIMENTOS 

Arquivo p/10Disquetes 65 

Formulario de 80 Colunas 140 

Picolex 95 

Cabo CP/500/lmpressora 590 



SERVICO EXPRESSO PARA TODO O BRASIL 





PROMOCAO BRASIL 
TRADE CENTER CCE 

CPU Exalo Pro + Monitor + 
Drive + 4 Interfaces 
A escolher Cz$ 20.999 
em 4 vezes s/juros 
ou a vista CzS 18.899 
( 10%dedesconto) 



GRAFIX FT 80 

15.390 

60 colunas, 160 CPS, rolo p'papel solto, 
tractor p formulario conlinuo. compalivel com 
lodosos 
micros.. 




COMPATfVEL 
COM IBM/XT 

42.500 

16 Bits. 640 Kbytes de 

memoria RAM, placa de mutti-luncao 

cRS 232 e paralela 

Centronics, placas conlrcJaooras 

de drives, placa conlroladora 

de video grafea, 

lonle interna de 150W. 




.vl'PU 



TK90X/48K 




2.790 
48 K de memdria 
RAM colorido 
Gratis 5 jogos a 
sua escolha. 



GRAFIX HS 100 

(160 CPS) 19.970 

Gralix HS 100 132 colunas - 160 CPS 

Tolalmenle gralica 

Compalivel 

c Apple, 

IBM PC. elc 




BTC/XT 100% 

COMPATfVEL 
C/IBM 640K 

Consulte: 16Bils256K 

Bytes de RAM, 2 drives 

Slim, placa conlroladora 

de drives, placa conlroladora 

de video gralica. 

lonle interna de alimenlacao 

de I50W 




CURSO DE INGLES 

BTC OUNICO 1.499 



NO BRASIL 



BRASILTRADE CENTER 



IPANEMA - AV. EPnACK) PESSOA 280 - « 259-1299 
IPANEMA - R. V1SC. DE PIRAJA, 580 U. 226 
l>RAMJEIf«S-aDASLARANJEIRAS,21U.2-a 285^543 
CENTRO - R. ASSEMBLEIA. 10 S/S 112 - S 222-1124 
WTEROI - R. LOPES TROVAO, 134 SVL - S 710-3659 
CAXIAS - a DR. MANOEL TELES, 113 L/E - « 771-«012 
TUUCA - R. CONDE DE BONF1M, 229 L/A - « 284-2031 




msx msx msx ms 










■■■ ■ in 



O grande mercado mineiro, 
com milhares de 
compradores em potencial 
estara nos tres pisos do 
MINASCENTRO querendo 
conhecero que voce tern 
paramostrareaderir 



a qualidadedeseus 
produtos e services. 
N3o fique de fora. Tudo 
mostrado ao vivo as 
pessoas certas. 
Reserve o seu stand e venha 
pronto para vender 



DE 23 A 27 DE JULHO DE 1986 ■ MINASCENTRO ■ BELO HORIZONTE 



Palrocinio: 



Realizagao: 



BU 
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Expertron 




Fabio Shiguemitsu Hara 



Como o pr6prio nome ja diz, esta e 
uma versao do TRON, feita para rodar 
em micros da linha MSX. Neste progra- 
ma, dois jogadores perseguem um ao 
outro, tentando evitar o choque com 
barreiras e, ao mesmo tempo, cons- 
truindo novas barreiras para encurralar o 
adversiirio. 

Podem participar de cada partida 
um ou dois jogadores. No caso de haver 
apenas um, o adversario sera o proprio 
micro. Neste tipo de partida, pode-se 
utilizar um joystick. Caso nao o possua, 
o jogador devera usar as setas do tecla- 
do. Para isso digite: 

400 IF ST1CK(0I=0 THEN Z-l. (FIlGOTO 430 
110 Z=STICK(0>:IF (Z/2)=INT(Z/2) THEN Z = 
Z+l: IF 7-9 THEN 2»I 

Quando se desejar jogar com outra 
pessoa, pode-se utilizar dois joysticks 
ou um joystick e as setas do teclado. 
Para jogar com dois joysticks, digite: 

400 IF STICK(2-FI»0 THEN Z=l. (F) :G0TO 430 
410 Z=STICK(2-F>: IF (Z/2)=INT(Z/2> THEN 
Z-Z+l: IF Z-9 THEN Z=l 

Lembre-se que, para quern nao pos- 
sui pelo menos um joystick so 6 pSssi- 
vel jogar da primeira maneira apresenta- 
da, ou seja, com apenas um jogador. 

DIGrTACAO 

A digitacao do programa e longa e 
cansativa. Para facilitar, preste atencao 
as seguintes dicas: 

Utilize "?", ao inves de "PRINT"; 

Quando houver duas ou mais linhas 
iguais ou parecidas, apenas troque o 
numero da linha e faca as modificacoes 
necessarias. Ex.: As linhas 60 e 640 sao 
identicas. Para nao refazer a linha 640, 
siga as instruc5es: 

— Digite LIST 60. 

— Suba ate o comeco da linha 60 com 
o auxflio das setas. 

— Troque o valor da linha e tecle 
RETURN. 

MACETES 

Neste jogo, voce se move em quatro 
direcoes: | , { ,"♦",-*". Se jogar con- 
tra o computador, voce vera" que ele per- 
sistira em segui-lo. Desse modo pode-se 
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fecha-lo, fazendo-o encostar-se na pare- 
de. 

Se a partida for jogada por duas 
pessoas, nao havera previsao de vence- 
dor, ja que existem mais de mil opcoes 
de jogadas. Aconselho o jogador a nao 
ficar com o botao apertado; s6 um to- 
que e sua moto ira para a direcSo deseja- 
da. Outra dica importante: nunca an- 
de para trds. 

OBSERVACOES 

Os caracteres entre aspas contidos 
no fim da linha 70 podem ser consegui- 



dos pressionando-se SHIFT + L GRA + 
O. 

Este programa possui linhas desneces- 
sirias, podendo-se retirar as linhas 290 
e 340. Depois, de um RENUM e as li- 
nhas ficarao em ordem de novo. 

A parte do programa em que o com- 
putador "pensa" para onde vai se loco- 
mover, esta" entre as linhas 460 e 630. 
Este "pensador" foi copiado de uma 
vers5o para a linha Sinclair. 



FAbio Shiguemitsu Hara possui um TK85 e 
um Expert, onde programa nas linguagens 
BASIC e Assembler. 



•»» EXPCRVRON *«« 

Copyright hy 

Fabio Shigupmi tsu Hara 



10 

20 

30 

40 

50 ON STOP GOSUB 860 

60 STOP ON 

7B SCREEN 0,,1:CLS:KEV OFF:COLOR 1.15. 15 

: WIDTH (40) 

80 SOUND 8, 16:S0UN0 /,SS:SOUND 6,5:SUIIND 

13, 1B:S0UND 12, IB0:SGUND 11,0 
90 LOCATE 13,0: PRINT "EXPERTRON": LOCATE 
13,1:PRINTSTRING»(9, 195) 
100 PRINI: INPUT "Duantos joyadur&s "ill 
110 IF N(I OR N,-2 THEN 70 

120 FOR C=l TO N:CLS:PRINT "Nome 'In "1CS 
" jogador ===> "::LINE INPUT NkIC) 
130 PRINT:PRINT NKOi" digite eeu carat 

or "»■»> ";:line input c*:A(C>=nsc(C*) 

140 IF N=l fiND A(C)"215 THEN 13W 

150 NEXT 

160 CLS: LOCATE IS., 10:PRIN1 "EXPKRIRUN" : F 

OR T=l TO 2000:NEXT:CLS 

1 70 SCREEN , , 

18i» FOR V=B TO 39:VPOKE V'80,219: VPOKE V 

>920,219:NEXT 

190 FOR V-3 TO 22: VPOKE 40»V, 219: VPOKE 4 

0»V+39,2I9:NEXT 

200 LOCATE 0,I:PRINT Ni(l)i" : "iJIII 

210 IF N=l THEM LOCATE 13,0:PRINT "MSX : 

"JM 
220 IF N-2 THEN LOCATE 34-LEII(N*(2> > , 1:P 
RINI N»(2>;" : ";J(2) 

230 IF J(l)-10 OR J(2>=10 OR rl=10 THEN 7 
70 

240 XI 1)=INT (RND ( -TIME) »79B> +161 
250 IF VPEEK<X(1) )<>32 THEN 240 
260 L(1) = INT (RND(-TIME)»7)-H:IF (Llll/2) 
=INT(L(l)/2> THEN 260 
270 X(0)=INT(RND<-TIME>»798)+161 
2D0 IF VPEEK(X10)I<>32 THEN 270 
290 L(0)»INT(RND(-T(ME)«7>+l:IF (l.(0)/2) 
=INT(L(0>/2> THEN 290 

300 SOUND 2, INT(RND<-T-IMU)«256):S0UND 3. 
INT(RNDI-TIME) »16>:S0UND 7,253:S0UND 9,1 

S:SOUND 2,0:sound 3.0:F=i :G0SUB 400 

310 IF XUK41 THEN 660 

320 IF VPEEK(XU) )'.;32 THEN 660 

330 VPOKE X < 1 ) , A ( 1 ) 

340 IF N=l THEN 480 

350 F'0: GOSUB 400 

360 IF X<8)<41 THEN 660 

370 IF VPEEK(X(0) )<>32 THEN 660 

380 VPOKE XI0>,A(2) 

390 GOTO 300 

400 IF STICK <r>-0 IHSN Z-L<FI:GOTO 430 

410 Z=STICK(F) : IF (Z/21-INTIZ/2) THEN Z = 

Z + l : [F Z=9 THEN 7=1 



420 LCF1-Z 

430 IF Z«l THEN X(F)»X(F>-40 

440 IF 7.-3 THEN X(F)-X(F)+1 

450 IF Z-5 THEN X(F)»X(F>*40 

460 IF Z-7 THEN X(F)-X(F>-1 

470 RETURN 

480 Z=0:L0"INT(X(0)/40):C0"INT(X(0)-(LU» 

40)1 

490 L1=1NT(X(1)/40):C1 = INT(X(1)-(L1M0)) 

300 IF ABS(L1-L0)>ABS(C1-C0) THEN 540 

510 IF VPEEK(X(0)+1>=32 AND C1.C0 THEN 7 

520 IF VPLEK(X(0)-l>-32 AND CKC0 THEN Z 

•7 

530 GOTO 560 

t>40 IF VPEEK(X(0)*40)=32 AND L1JL0 1HEN 

Z-5 

550 IF VPEEK<X<0>-40>»32 AND LKL0 THEN 

Z"l 

560 IF ZO0 THEN 620 

570 Z=l 

580 IF VPEEK IX (01-11=32 THEN Z=7 

590 IF VPEEK(X(0> I40)=32 THEN Z=5 

601. IT VPEEK(X(0>-4O>=32 1HEN Z=l 

610 IF VPEEK(X IB) +11-32 THEN Z-3 

620 F=0:(>OBUB 430 

630 IF VPI : EK(X(0)><>32 THEN 660 

640 VPOKE X(0) ,215 

650 GOTO 300 

660 SOUND 8,1 6: SOUND 7, 55: SOUND 6,5:S0UN 

D 13, I0:SUUND 12, 1B01GOUND 11,0 

l.li! FOR T-! Ill 10001NEXT 

600 IF F=l AND N=2 THEN CLS:.I (2) =J (2) -1-1 : 

PRINT H*(2) I 

o90 IF F=0 AND N=2 THEN CLS: ( 1 ) =J ( 1 )+l : 

PRINT NS(l)! 

700 IF N-l THEN 740 

710 PRINT " Harcon mais um ponto!" 

720 FOR T«l TO 200B: NEXT: CLS 

730 GOTO 180 

740 IF F-l THEN CLS: M-rHl: PRINT "E11 fatu 

rei esta. Ha! Ila!" 

750 IF F-B THEN CLS: J ! 1 )=J ( 1) ♦! : PRINT " 

Voce marcoii maia um panto!" 

760 GOTO 720 

770 FOR T-l TO 2000: NEXT: CLS 

7i» LOCATE 10.10:PRINT "Vencudor: "I IFOR 

T=l TO 5:BEEP:NEXT 
790 IF N--10 THIN PRIN1 "LKpurt - I1SX" 
800 IF J(l) = 10 THEN PRINT N« 1 1 ) 
B10 IF J(2>=10 THEN PRINT N*(2) 
82.1 LOCATE 0,20:PRINT "Outra ■/ez ? (S/N) 
: :":L0CA1E 19,20:H»=INPUIK1):PRIN1 H» 
830 IF H»-"8" OR H»-"«" THEN RUN 
840 IF H*="N" OR Ht="n" THEN SCREEN ,,11 
WIDTHI39) :KEY ON:CLS:NEW 
850 BEEP: GOTO 820 
860 CLS: SCREEN 0,,1:END 
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Voce pode incrementar o modo grafico do seu Color acrescentando a 
ele novoscomandos. Nesteartigo,aprendaaimplementaro DRAW. 



Comando DRAW 
em semigraficos 



.Ce/so Bressan. 



No artigo intitulado "Graficos especiais", de Claudio 
Costa (MS nP 51), foi analisado o modo semigrafico, 
o qual e pobremente documentado e ainda pouco re- 
ferenciado em publica99es especializadas (com exce- 
95o, e claro, da ja mencionada materia). Esse modo e portanto 
um recurso a mais que o programador dispOe para enriquecer 
os seus programas. 

BASIC e o Extended Color BASIC (EcB) tambe'm sao 
omissos neste ponto, haja vista que nao implementam coman- 
dos diretos semelhantes aqueles dos graficos de alta-resoluc3o, 
a nab ser os limitados SET e RESET, deixando todo o resto 
da tarefa por conta dos consoladores PEEK e POKE. 

Quern se aprofunda no estudo deste computador sabe do 
poder que os comandos existentes oferecem e sabe tambem 
(ou, pelo menos, deveria saber) do esfor?o que os tecnicos da 
Microsoft tiveram para encaixar tudo em 16 Kb de ROM, sen- 
do 8 para o BASIC e 8 para o EcB. Em resumo, foi colocado o 
maximo dentro do minimo! £ justified vel, portanto, admitir- 
se a ausencia de diversos comandos e instrucOes, inclusive al- 
guns para os semigraficos, por absoluta falta de espaco na 
ROM. 

Hoje, este tipo de questionamento poderia ate nab ser 
significative pois as memorias estab cada vez mais baratas (es- 
te foi um dos maiores motivos, o custo.). Porem, naepoca do 
lan9amento do primeiro Color Computer, 1980, tal fator era 
de muita relevancia, a ponto das primeiras maquinas virem 
equipadas somente com o BASIC e 2 Kb de memoria RAM. 
Nem por isto os usuarios se sentiram diminuidos, pois tudo 
que fazemos hoje era possi'vel fazer-se entab, so que com mui- 
to malabarismo! 

Outro fator que parece ter pesado bastante foi a reduzi- 
da qualidade dos graficos produzidos pelos semigraficos. Pri- 
meiro, porque a resolu9ab e baixa e, portanto, limita a apresen- 
ta93o, segundo, porque nem todos os pontos podem ser pro- 
gramados a vontade, pois uns dependem dos seus adjacentes, 
dentro do mesmo byte, o que restringe um pouco a escolha de 
cores. Evidentemente, na hora de escolher-se o que era melhor 
para o Color, e como nem tudo poderia ser colocado, os recur- 
sos oferecidos pelos semigraficos foram os preteridos. 
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Mas, estoria £ parte, vamos ver que a situagab nab e tab 
desesperadora assim. Os semigraficos tern o seu valor, princi- 
palmente no que tange a sua aplicacab em textos de todos os ti- 
pos (recurso este muito usado em programas maisprofissionais, 
sem muito alarde), alem de alguns tipos especiais de jogos e 
programas educativos. 

Esta a nosso cargo, no entanto, usar um pouco de cria- 
tividade e imagina9ab de forma a preencher uma parte desta la- 
cuna. Come9aremos entao pela implementa9ab do comando 
SDRAW, que Simula o DRAW da alta-resolu9ab, e deixaremos 
para o leitor a tarefa de criar outros mais (atencab leitores Co- 
lormani'acos, estab todos desafiados! ). 

COMANDO DRAW 

Dentre as possibilidades de implementa9ab do comando, 
destaca-se aquela que provoca chamadas a uma sub-rotina em 
BASIC, passando as instrucOes necessarias dentro de uma varia- 
vel fixa, convencionada do tipo string (mais simples e facil; a 
nossa preferida) e uma outra que intercepta um dos va"rios gan- 
chos ou hooks que existem no sistema operacional do BASIC, 
ganchos estes especialmente construidos para permitir ainter- 
rup9ab de erros, entradas e sai'das, alem de controlarem a exe- 
01930 de varios comandos do BASIC. 

Esta tecnica, por ser sofisticada, deve ser realizada em 
Assembler, o que nos for9a a abandonar o aspecto didatico e 
pratico do nosso trabalho. Claro esta que a sub-rotina assim 
tratada ficaria muitfssimo mais veloz, eficiente e profissional, 
mas, este aspecto fica para os mais interessados no assunto (o 
autor ja esta elaborando uma para seus programas). 

Falamos muito do novo comando, comparandoo como 
DRAW, contudo nao explicamos o que este ultimo e e o que 
ele faz (para quern nao souber). 

Como o no me bem diz.o comando DRAW faz desenhos 
(risca, mostra ou apresenta desenhos) de uma maneira simples 
e facil atraves de subcomandos especificados internamente ao 
comando. Exemplo: se quisermos tra9ar um triangulo-retangu- 
lo bem no centra do video, na cor verde, escreveriamos o se- 
guinte programa, sem o DRAW: 
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10 PHODE 3, 1:PCLEAR: SCREEN 1,1 

20 COLOR 6 

30 LINE (100,80)-<130,80),PSET 

40 LINE -(130, 1101.PSET 

50 LINE -(100,80), PSET 

60 GOTO 60 

Ja com o comando DRAW, a situa9ab muda: 

10 PMODE 3, 1:PCLEAR: SCREEN 1,1 
20 DRAW "BM100.80C6R30D30H30" 
30 GOTO 30 

Numa explica92o suscinta do exposto, os subcomandos 
BM especificam que o tra9ado deve come9ar no par de coorde- 
nadas de video (100, 80); o subcomando C especifica a cor 6 
(verde); o R, risca uma linha 30 pontos para a direita, e assim 
por diante. 

Na sub-rotina SDRAW, as coisas se passam de maneira 
identica, segundo regras especificadas a seguir: 

Bxxyyy - Hovimenta o cursor sem desenhar, para xx.yyy 

Cc - Indica a cor do risco, de ate 8; 

Un - Risca para cima, n pontos; 

Rn - Risca para a direita, n pontos; 

Dn - Risca para baixo, n pontos; 

Ln - Risca para a esquerda, n pontos; 

En - Risca em angulo de 45 graus, n pontos; 

Fn - Risca em angulo de 135 graus, n pontos; 

Gn - Risca em angulo de 225 graus, n pontos; 

Hn - Risca em angulo de 315 graus, n pontos; 

Vv - Posiciona o tipo de Semigrafico, de 1 a 5; 

Ss - Limpa a tela com a cor s, de a 8; 

Tt - Mostra o carater t onde estiver o cursor; 

ObservacOes: Os valores de n, correspondents ao deslo- 
camento do cursor, vab de ate 9, sendo que para valores 
maiores deve ser repetido o subcomando tantas vezes quantas 
forem necessdrias. Os subcomandos V e T nab existem no 
DRAW e o S tern fun9ab completamente diferente. As coorde- 



nadas do subcomando B variam de 00 ate 63, na horizontal; e 
de 000 ate 1 9 l,na vertical. 

Os movimentos do cursor sab visualizados pelas figuras 
a seguir: 




Vamos observar na listagem do programa as tres partes 
bem definidas que constituem nosso trabalho. A primeira, das 
linhas 100 ate 150, contem inicializa95es fundamentals a boa 
execu95o do comando; a segunda, das linhas 160 ate 430, con- 
te'm as chamadas a sub-rotina, representando a utiliza9ab pro- 
priamente dita, atraves de assinalamentos ao string A$ e co- 
mandos GOSUB; e a terceira, das linhas 440 ate 780, e a sub- 
rotina que implementa o comando. 

O programa-exemplo mostrado esta completo. Imple- 
menteo em seu micro e.veja o que acontece! 

Uma questao muito importante a ser observada na hora 
de usar o comando SDRAW em seus proprios programas e a 
codifica93o das variaveis, que deve ser respeitada segundo 
aquelas previamente definidas, para nab ocorrer problemas de 
funcionamento do programa como um todo. Algumas destas 
variaveis sab documentadas na tabela a seguir, nab podendo ser 
usadas em nenhum outro lugar do programa: 

CCS - Contem a cor de fundo; 

SSS - Contem os padroes de cor de fundo; 

UU - Contem o endereco de inicio da area de graficos; 

XX - Contem a coordenada X, horizontal; 

YY. - Contem a coordenada Y, vertical; 

Alem das variaveis descritas anteriormente, sSo tambe'm 
usadas: W, EE, TT, II, DDS, RR, LL, MM, NN, SS, SI, FF e m 
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COMANDO DRAW EM SEMIGRAFICOS 



DRAW em semigraficos 



INICIRLIZfl SDRR1J 



100 

110 

120 ' 

130 CC*»"F" 'UU-PEEKC6.HBHX256+PE 

EK< 8.HBE > ' XX-0 ■ YY-0 

140 VV-INT<UU/3t2>'EE-&HFFC6>TT- 

7 . GOSUB670 

150 S3*-"80S323F3C393633303" <P0K 

ES5314.7 

160 ' 

170 ' UTILIZR n SDRRW 

130 ' 

190 M-"S0V3" 

200 GOSUB440 

210 R*»"B10041D3F1D3F1D2F1D1F1D1 

F4R1F1R1F1R2F1R4F1E1R3E1R1E1R1E2 

U1H4" 

220 GOSUB440 

230 fl*="UlC4ElUlL2G2L2GlLlGlDlR4 

E1R1E1" 

240 GOSUB440 

250 Pt- " B 1 9062C8D3G 1 D2G 1D2B 1 0070 

C7R2E1R4E1R6F1R3F1R2E1R3E1R4F1R1 



F1R1C8B33064D2F1D1" 

2S0 COSUB440 

270 R*«"B14047C4E1U1E2R2E1R2D2G3 

L2G1L1U1E1C0E2C5E1R1D1G1U2" 

280 GOSUB440 

290 R««"B24043C4U2E2R1E1R4O2G21.1 

G1L4E1C0E2C5E1R1D1G1U2" 

330 GO3UB440 

310 R*»"B05039C1R9R3E1R4E1R2E1R1 

E1R1E1R2E1R1E1R1E2L9L1H1U1H3L2G1 

L1G2L3G1L3F1D5G1L1G1L1G1" 

320 GOSU3440 

330 R*»"B23045CSR7F1D1G4R3E1R2F1 

340 GOSUB440 

350 R*»"B0 1 1 5C6R9R9R9R9R9D9D9D9 

D9D9D9D9D9L9L9L9L9L9U9U9U9U9U9U9 

U9U9" 

360 GOSUB440 

3-0 H*="B43023TO" 

330 GOSUB440 

390 R*="B43030TCTRTITPT1TRTR" 

400 GOSUB440 

410 R*»"B48042TPTITCTRTST3TO" 



420 GOSUB440 
430 COTO430 
440 • 

'.50 ' SUBROTINR SDRRW 
460 ' 

470 FOR II-l TO LEN<R*> 
480 DD*»I1ID*(R*>IIj1><II»II + i 
490 IF DD*»°B" THEN XX"VRL<MID*< 
R*,II,2>>'YV-VRL<MID*<fl*, II+2,3> 
> ! 11-11*4 GOTO650 
500 RR»VRt_<MID*<fl*,II,l>> 
510 ON INSTR<"SVTC".D>D*>*1 GOTO 
520,610,620,630,640 
520 LL=INSTR< "UURLEFGH" , DD* >*2 ' M 
M-VRL<MID*<" 0+1-1*1+1-1-1", L 
L,2>>'NN-VF.L<MID*<" -1*1 0-1 + 1 
♦ l-l'M-US?) 
330 FOR LL-1 TO RR 
540 GOSUB720 i POKE EE ■ VRU EE* > ' XX 
-XX+MM i YY-YY+NN 
353 IF XX<0 THEN XX«0 
360 IF XX>63 THEN XX-63 
570 If : YY<0 THEN YY»0 
530 IF YY>191 THEN YY-191 
590 NEXT LL 
600 GOTO 650 

610 PM0DE3,1 'SS-RR*2+1'P0KE 179, 
VRU "8.H"+M1D*< SS*- SS- 2 > > ' PCLS ' SI 
=<S3+13>*8+13'GOTOC30 



S20 W-< RR- 1 >*2 i EE"&HFFC0 1 TT>3 • G 

OSU6670 i GOTOS30 

630 GOSUB720'FF»RSC<MID«S*,II,1 

>>'FOR LL»EE TO EE+160 STEP 32' P 

OKE LL,FF>NEXT LL ' XX-XX+2 • G0TOS5 



640 CC*-MIC>*< "089RBCDEF",RR+1, 1) 

630 NEXT II 

660 RETURN 

670 'CHRVES DE CONTROLE 

680 FOR LL-EE TO EE+TT*2-2 STEP 

690 f1M»W.W-INT<VVV2>'P0KE LL+M 

M-W*2,B 

700 NEXT LL 

710 RETURN 

720 ' CRLCULfl ENDERECO 

730 EE»UU+YY*32+ INTC XX.-2 > • FF-PEE 

KC EE / 

740 IF FF»S1 THEN POKE EE.FF RND 

240 
750 KK-< ?EEK< EE > RND 13 i OR < 10- 
< XX RND 1 >*5 > 
760 EE*="S,H"+CC*+HEX*<KK> 
770 IF CC*-"0" THEN EE*""S,HF0" 
780 RETURN 



KK, que servem apenas para trabalho, pod en do ser utilizadas 
desde que nao guardem valores permanentes. Adicionalmente, 
a variavel A$ recebe os parametros para a sub-rotina e tambem 
pode ser usada enquanto nao ocorrerem chamadas. 

Por ultimo, vamos lan9ar dois desafios aos leitores. Um.ja 
proposto, e a implementacao para os semigraficos de outros 
comandos existentes em alta-resolu?ao (para nao complicar 
muito, comecem pelos comandos PSET e PRESET, que tern 
similares no SET e RESET). 

Ja o segundo desafio exige uma elabora93o bem maior, 
consistindo na criacao de uma sub-rotina ou programa que im- 
plemente textos em semigraficos, semelhantes ao modo texto 
comum do dia-a-dia. A diferenpa fica por conta dos estilos de 



letras e outros simbolos, inclusive pequenos desenhos que ca- 
bem no espaco ocupado por um ou mais caracteres comuns 
(o ideal e um carater apenas). Uma dica importante: trabalhe 
no modo S24 (vide o ja mencionado artigo de Claudio Costa, 
publicado em dezembro de 1 985) mantendo o bit mais a es- 
querda de cada byte sempre desligado. 



Celso Bressan 6 formado em engenharia eletrOnica e possui o curso de 
pds-graduacao em sistemas de informacao pela UFRGS. Trabalha em 
processamento de dados, desde 1969. Atualmente, 4 Ana lis to de Siste- 
mas na PROGERGS — Companhia de Processamento do Sstado do Rio, 
Grande do Sui. 



Quern tern tradicao 
em software, tern tudo. 



pA GA' 



H*S£ 
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$3.12° 



Faz a Foiiia de Pagamento de sua 
empresa, emitindo relatflrios como 
Guia de IAPAS, Guia de FGTS, Relagao 
de Empregados, Relapao para I.R.. 
Relagao para Banco, Inlorme de 
Rendimentos, Acumulados Anuais. 
RAIS e Recibo de Pagamento. A folha 
pode ser semanal ou mensal. As 
tabelas sao modilicadas pelo proprio 
usuario. 

Permite tambem, adiantamentos de 
salario reajuste safaris I . alleraqSes de 
acumulados e oulras funcdes que 
agilizem o processamento da Folha de 
Pagamento da empresa. 
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A Conlabilidade de um mes em apenas 
2 horas! Este Sistema permile o 
cadastramento de historicos 
padronizados e de piano de contas 
com ate 5 niveis. 
Emlte Diario.Razao, Balancete. 
Halarigo. Demonstracao de 
Resultados. Demonslragao de Lucros 
e Prejuizos acumulados, Listagem por 
centro de custo e extrato de contas, 
entre outras funcoes. 
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$2.19° 



Controla o estoque de itens com 
Espccihcacao. Estoque Minlmo, 
Unidade, Fornecedor, Localizacao e 
outras informagSes relacionadas no 
item como Custo Medio, Entradas e 
Saidas no periodo, etc. 
Fornece Listagens Geral e Parcial dos 
produtos, Listagem Fisico-Financeira. 
Listagem dos produtos abaixo do 
estoque minimo, Lista de Pregos e 
Etiquetas, entre outras. 
Admite tambem, Reajuste de Pregos, 
Allcragao de Dados e Exclusao de 
Produtos. 



Compaliveis com as linhas TR5-80 e Apple Tambem disponiveis para IBM-PC Procure-nos para maiores inlormacoes. 



A NASAJON oferece assistencia 
tecnica total, garantia permanente e 
mantem a sua disppsigao 
programadores e analistas para 
desenvolver sistemas especificos sob 
encomenda. Conte com a NASAJON 
SISTEMAS 



^nci/cijon 



Av. Rio Branco, 45- Grupo 1.311 
Rio de Janeiro -CEP 20.090 
Tels: (021)263-1241e 233-0615 



EmpfiutiludiiASSESPRO. 




O SOFTWARE PARA O SEU MICRO 



Na compra de qualquer 
produto Softline, 
receba o informativo TILT 
com a descrigao de 
programas, dicas, novidades 
e informagoes tecnicas. 




F = pode ser gravado em flta K7 

J = u so obr Iga torio de Joystick 
48 = requer 48 K de RAM 
64 = requer 64K de RAM 

JOGOS - APPLE II 

— CzS 80,00 — 

Sabotage <F> ■ evite os paV3-Que*st3S 

Salon (F) • pgo de xa#w 

Oraw Poker (F) • jogo de pokef 

Blackjack (FJ-jogode 21 (cartas) 

CtMcken {F> - jogo de damas 

Here (F) - resgate os nweiros perdidos 

Robotron (F) ■ destrua os roWs mimigos 

Falcons (F) * jogo tipo Ptiena 

Night Mission (Fj- jogo OepirOail 

Fast Gammon (F) ■ pgo de gamao 

OtWlolFljogodetabufetro 

Lode Rvnner ■ pegue os tesouros 

Olympic Decatton • jogos olimpicos 

Space Raiders (F) • de tjpo centoc&a 

Gorgon (F) ■ jogos dos Ririsos 

The Eliminator |F) • combate ecpacial 

Night Crawief (F| • enlitrte as centoptes 

Space Eggs (F/J) - caca ovos espaceis 

Autobahn |F) - comda de cams 

The Asteroid Field (F) • ipo astero-des 

Hard Hat Mack • perigos na construcSo 

Choplifter (F/J) - resgate com Wlicoptero 

Sea Oragon • p*)te submanno 

Spy's Demise (F) ■ fogo <Je agente secreto 

Star Biarn - combate aeVeo 

Viper IF) atanente a cobra 

Cavern Creatures • penetre ra cavema 

Moon Patrol (F) ■ patruha hjnar 

Ms. Pac Man (F) - a namorada do Pac Man 

Marto Bros (F) HaVio contra o gonla 

Buck Rogers ■ pitote sua nave em "Zoom" 

Pitfall II • aventuras nas cavemas perrMas 

Castle WoKensteln • engane os (wstas 

8eyortd Castle Wotrensteln - mate Hrrjer 

Artec - decitre o entgma da p*5mide azteca 



UTILITARIOS/APUCATIVOS - C2$ 360,00 

Visicalc piartiihaoeca'cuios 

Visiptot'Vlsitrend geraaor Oe gra'ticos 

Visidex ' organizaOor de atividades 

Visifile - gwado* de banco de dados 

Visiterm ■ programa de comumcacao via MODEM 

visicheduie ■ anaiise hnancea PERT'CPM 

Apple LOGO - compitador 

Apple FORTRAN (CP/M) ■ compilaflor 

Apple Mechanic - uMitirio g'itico 

Alpha Plot gerador de griticos para uso comerciai 

GraFORTH compiiaflor 

Locksmith 5.0/F - uMitirio de cop a 

Nibbles A*ay II/C3 • uMdatio de copia 

The Graphics Magicians - arvmador grafico 

The Graphics Solution editor de gradcos 

Print Shop • gerador de impressos gra'icos 

Print Shop Companion • compiemento do Print Shop 

Magic Window II • processador de textos 

UTILITARIOS/APUCATIVOS - Cz$ 520,00 

News Room • faca seu propno fOrnal 
ASCII Express • super uMitirio de comumcacao 
Turbo PASCAL (CP/M) ■ compitador 
Take 1 - super ammador gr^Jico 

JOYSTICK ANALfiGICO • Cz$ 360,00 



JOGOS - CP-300/500 

-CzS 80,00- 

FHgM Simulator [F) ■ simulador de \oo 
Olympic Oecatlon (F) ■ jogos ofenpicos 
Hoppy(F)sah«osapo 
Armored Patrol (F) • patrJha de tanques 
Lunar Lander (F) • pouse nas crawras da iua 
Allen Oeterae (F) • proteose dos invasores 
Meteor Mission (F) - cacada espaaal 
Outhouse (F) ■ proteja o seu banhe*o 
Robot Attack (f) • destrua os roods 
Sea Dragon |F) • pdote um submarino 

Mi-rii. 4)-ob fP . r'a/ar,i<i «■* Mvt« 



JOGOS -SPECTRUM/TK90X 
-CzS 70.00- 

Monty Mole (48) ■ pegue carvao nas caver nas 

3D Lunattack 1.48) explore uma terra immiga 

Ore Attack (48) - delenda seu caslelo dos mvasores 

Armageddon (48) • igual ao missile comando do ATARI 

Erie (48) ■ destrua os baioes 

Beaky (4B) - proteja OS ovos 

Hardcheese (48) ■ similar ao MR. DO 

Hunted Hedges (48) • exduswo PAC MAN tridimensional 

Caesar the Cat (48) - delenda sua geiadeira dos ratos 

Micro bot (48) - uma aventura nos encanamentos 

Rupert (48) - cumpra a sua rmssao numa terra estranha 

Moon Alert (48) ■ methor que o Moon Patrol do Hipper 

Stop the Express (48) pare um vent 

Bruce Lee (48) • lute Kung Fu contra o$ mangos 

La Squola (48) - seia um aluno travesso. em 3D 

Allen 8 (48) - ajude a reanimar os astronautas. em 3D 

Critical Mass (48) - ande na superf ioe lunar, em 3D 

Raid over Moscow (48) invada a odade oe Moscou 

Underwurtde (48) ■ contmuar^ao do Sabre Wutt 

Zaxxon (48) • famoso |Ogo na sua vers*) original 

Spy Hunter (48) ajude o espiao nesta aventura 

Flak (48) ■ pareodo com o Columbia 

Gilllgan's Gold (48) • roube o ouro oas minas 

Blue Max (48) • piiole um bipiano em 30 

Hunckback II (48) ajude corcunda '• * I "rwa miss*) 

Fighter Pilot (48) ■ pilote um F-15 Eagle 

Flight Simulation (48) • simulador de too 

TerrorOaktil 4D (48) • agao na terra perdtda 

Trader (48) * comfrcio e a0o no espaco 

Styx (48) ■ ande no larxmto e mate a bruxa 

Tutartkhamun (48) ■ explore a tumba do farad 

Tornado (48) - p&te o aviao. Cenkio em 3D 

Match Point (48) • fantasbco ten* em 30 

Cavelon (48) • uma aventura no castelo 

AO Astra (48) • saKe os sokJados. kfo em 3D 

Ga'axy Attack (48) - vanas rases no espaco 

Chess (48) ■ jogo de xadrez com rinds nheis 

Android 2 (48) mate os robes Cenano em 30 

Delta Wing (48) ■ p4ote um caca M6 em 3D 

Manic Miner (48) - recolha os objetos da t - > 

Potty Painter (48) - preencha os ouadrados 



Strip Poker (48) ■ rtspa sua mcrivel oponente 
Esquimo Eddie (48) - uma aventura na anUrtica 
Kong (48) • ajude Mario a saNar a moca do gorila 
Turti Fruttl (48) - incmel caca nioueis sonoro 
Pinball (48) ■ simuiacft de um pirtall 
Freez (48) • destrua o irwnigo com os cubos de gelo 
New Poker (48) • classco jogo de poker 

JOGOS -Ci i 100.00 

Never Ending Story (48) - jogo twseado no dime 

Valhalla (48) - aventura na era medieval 

UTILITARIOS/APUCATIVOS ■ SPECTRUM/ 

TK90X 

- CzS 80,00 - 

VU 3D - utiltfino graf icq fclas em 30 

VUCalcpianiihadeciicuios 
VU File - arqufto de dados para uso geral 
Ultra Violet ■ super Disassembler 
MC0DER II -compJacor BASIC 

-CzS 100,00- 

SoftCALC • ptamlha de cakulos com GRAFIC0S 
PASCAL 1.6 compiiador 
SpecFORTH • compiiador 
ASSEMBLER • super edtor assembler 
Tasword II • processador de texto com 64 cofcjnas 
The KEY • super cop,aoor de programas 
Paint Phis • eoMor de telas grafcas 
Screen Machine - utiMiro grdfco 

HOT BIT/EXPERT (MSX) 
JOGOS • Cz$ 80,00 

Flight Simulator • simulador de voo num Boeing 737 
Polar Star guerrdha cosmica em POLAR IV. 30 
Donpan divertiOo iogo de ac;ao 
Jumping Rabbit - arude o coelho a subir o editicio 
Project A • jogo com nefntts kj'as de Rung Fu 
Haunted House escale o predK) assombrado 
Trick Boy • fantastico wfio de (iipoerama 



Criar programas eficientes e economicos no Basic do ZX81 nao e 
tao dificil assim. Veja agora alguns macetes que podem ajuda-lo. 



Programe bem, 
sem desperdfcios! 



U 



.Joao Jose Marques Goncalves . 



OS NUMEROS DO PROGRAMA 



m dos pontos fracos dos micros 

da linha ZX81 e certamente a 

sua baixa velocidade de execu- As constantes numericas, como todos 

920. Isto acaba levando a maio- ja devem saber, ocupam alem do espaco 



o CODE apresenta uma economia de 
dois bytes em relaca"o ao VAL. 

Outra funcao bastante importante e 
PI. Juntamente com as func5es NOT, 




Teste esta rotina e depois experimen- 
te com: 

20 PRINT AT 12, 16; CHR$(28+F) 

Veja como e simples e rapido este 
metodo. Assim, pouco a pouco, seu pro- 
grama vai ficando mais agil e economi- 
co. 

OUTROS MACETES 

A questao da lentidao do BASIC 
sempre deve ser levada em consideracao 
antes de se comecar a criar um progra- 
ma. Isto e" vdlido para qualquer compu- 
tador, entretanto, no caso da linha 
ZX81 e extremamente cri'tico. Entao, 
torna-se necessdrio um planejamento 
mais cuidadoso do algoritmo do progra- 
ma. Por exemplo, podemos tentar evi- 
tar longas listas de LETs ou rotinas de 
definicao de variaveis. No entanto, as 
vezes, isto n5o e" possivel de ser feito. 
Quando isso acontece a solucao e 
tentar usar estas rotinas como rotinas 
de temporizacao de apresentac5es e tex- 
tos. Tenho um programa que utuliza 
esta tecnica e o efeito e muito bom. 
Assim, nao e" necessdrio recorrer ao 
incomodo FAST e o resultado sao as 
suas variaveis definidas de forma im- 
percepti'vel ao usuario. 



Outra coisa que deve ser evitada e a 
repeticao, muitas vezes desnecessaria, 
de calculos numericos complicados que 
computador leva tempo para realizar. 
Neste caso, se enquadram principalmen- 
te as funcOes exponenciais, logan'tmicas, 
trigonometricas ou de grau maior ou 
igual a dois. Quando estas funcOes fo- 
rem usadas vdrias vezes pelo programa 
com seqiiencias previsi'veis de valores 
para suas varidveis independentes, e" con- 
veniente executa-las apenas uma vez e 
armazenar seus resultados em um array 
para posterior utilizacao. Esta e uma 
forma de se reduzir o tempo gasto com 
calculos em alguns programas. 

Para finalizar, vou voltar a destacar 
a importancia dos cuidados com a codi- 
ficacao, pois ainda hoje e muito comum 
o uso pouco inteligente de algumas das 
instrucoes mais simples do BASIC. O 
PRINT e o IF THEN sao as principals. 

No caso do PRINT, por exemplo, e 
muito comum coisas deste tipo: 

10 PRINT "MICRO" 
20 PRINT "SISTEMAS" 

Entretanto, o que foi feito pode ser es- 
crito assim: 

10 PRINT "MICRO",, 
"SISTEMAS" 



A diferenca de velocidade e desprezi- 
vel, mas com relacao ao consumo de me- 
moria, o segundo metodo e quatro bytes 
mais economico. 

Outro recurso pouqui'ssimo explora- 
do 6 o das impressOes condicionais co- 
mo esta: PRINT A$ AND B=10, ou 
seja, se B=10, a variavel AS ira para 
a tela, caso contrario sera" impressa uma 
string vazia. 

No caso do IF THEN, o que eu posso 
recomendar e uso, sempre que possi- 
vel, das func5es AND e OR, evitando 
assim longas listas de desvios condi- 
cionais para o mesmo lugar. Uma 
boa dica tambdm e a substitui?ao de 
comparac5es do tipo A = ou A < > 
por NOT A e A simplesmente. 

Todos os macetes ou tecnicas apre- 
sentadas neste artigo nao tern como 
finalidade transformar o ZX81 em um 
supermicro, mas, com um pouquinho de 
jeito e imaginacao, podem tornar seus 
programas em BASIC menos enfado- 
nlios e mais economicos. Feliz progra- 
maclo. 



Joao Jos4 M. Gonpalves estuda engenharia 
elitrica, na FEPI, e fa! um curso de processa- 
mento de dados, na FEPI. Ele ainda programa 
em BASIC e Assembler nos micros ZX81, 
TRS-80 e Apple II. 



COMUTADORES MANUAIS E AUTOMATICOS 
DA SUPORTE E O CAMINHO MAIS FA'CIL 
PARA SEU PERIFERICO" 




RIO: RUA CURUZU. 17 TEL: (021) 580-4880/7886 TELEX: (021) 36577 SPOT 
SP: PRACA DA REPUBLICA, 272 CONJ. 32 TEL: (01 1 ) 231-2678 
BAHIA: RUA DOS BANDEIRANTES. 92 TEL: (071) 244-3409 



Linha APPLE 



Minissintetizador 
no Apple 

Esta dica traz urn programa que Si- 
mula um miniorgao, que pode ser roda- 
do em computadores da linha Apple. 
Apos rodd-lo, as teclas nume'ricas (1 a 
0) produzem sons semelhantes aos de 
um sintetizador. 

2 POKE 770,173: POKE 771,48: POKE 
772,192: POKE 773,136: POKE 
774,208: POKE 775,5: POKE 77 
6,206: POKE 777,1: POKE 773, 
3: POKE 779,210: POKE 780,9: 
POKH 7131,202: POKE 782,208: 

."> POKE 7H3,24S: POKL 784,174: POKE: 
785,0: POKE 736,3: POKE 787, 
76: POKE 788,2: POKE 789,3: POKE 
790,96: POKE 791.0: POKE 792 





.0 










•1 


CO TO 100 










19 


REM 










20 


RET AS 










32 


IF A* = 


"1" 


THEN 


A 


« ID 


33 


IF A* =• 


ii oi. 


THEN 


A 


~ 20 


34 


IF A*. = 


"3" 


THEN 


A 


= 30 


35 


IF A* = 


" ,i » 


THEN 


A 


= 40 


36 


IF A* = 


"5" 


THEN 


A 


= 50 


37 


IF At = 


"6" 


Tl EN 


A 


= 60 


38 


IF A* = 


"7" 


THEN 


A 


=■■ 70 


59 


IF A* = 


■■£,.. 


THEN 


A 


^ 00 


40 


IF At = 


"9" 


THEN 


A 


= 70 


41 


IF A* = 


"0" 


THEN 


A 


-•- 100 


60 


HUME : POKE 


768,. 


IS 


POKE 769, A 




: CALL 


770 








70 


GOTO 20 










100 


HOME 










1 10 


PRINT 


tUtiHtttHtHtltS 1 1 ITFT I 7 ADOR 




1 l#tttt»!t««rt;t#ititit": 


PRINT 


1 11 


PRINT ' 


TEC 


-AS: 1:2:3:4:5:6:7 




: : 9 : 


: PRINT 


PRINT TAB! 




9) 5" (CTRL- 


VESET 


PARA FAIR)" 


112 


FOP: I = 


1 


TO E000: 


NEXT I: HOME 



113 GOTO 20 

120 REM IVAN S.S.I. -21/02/86 



IvanS. G. Lima-BA. 



Linha MSX 



Ampliando 
caracteres 

Uma das caracten'sticas 
mais interessantes dos micros 
da linha MSX e a possibilida- 
de de misturar textos e gra- 
ficos. 

Sendo assim, elaborei um 
pequeno programa que am- 
plia o tamanho dos caracteres. 

10 I.LS 

2« OPEN "RRP: "AS#1 

7>0 SCREEN 3 

40 PRE3E1 (00,72) 

30 PHI NT !M , "USX" 

6fil an.UR I'illDI I ) a 15 

70 GOTO 40 



Roberto A. M. do Valle e 
Silvio Rafael M. dos Santos- RJ. 



die"! 





Envie suas dicas para a RedacSo de 
MICRO SISTEMAS na Av. Presidente 
Wilson, 165 - grupo 1210. Centre, Rio de 
Janeiro, RJ. CEP 20030 



Linha 



MSX 



Tamanho 
do programa 

Se voce quiser sa- 
ber quantos Bytes o- 
cupa o seu programa, 
facao seguinte: 

a) De um LIST. 

b) De o seguinte 
comando direto: 
PRINT 28815 -FRE(l) 

O resultado sera a 
memoria ocupada 
pelo seu programa. 



Sergio Augusto 
F re ire de Souza - AM 



Linha TRS COLOR 



Construindo com rapidez 



Com esta pequena dica, pode- 
se construir um pr^dio com quan- 
tos an dares quiser! Bast a inserir 
esta rotina nos programas que 
utilizem alta resolucao grifica: 

10 PMODE 4:PCLS 5: SCREEN 1,1 

20 FDR N=0 TO 19 STEP .5 

30 CIRCLE (129, 191),V,0,N 

40 NEXT 

50 GOTO 50 

Se voce preferir andares mais 
"espremidos", modifique a linha 



20 para: 

20 FOR N=0 TO 19 STEP .25 

Voce pode, ainda, encher a tela 
com predios de diferentes tama- 
nhos, digitando: 

15 FOR 11=0 TO 240 STEP IS 

17 C=RND(10)+8 

20 FOR N=0 TO C STEP .5 

30 CIRCLE (10+M, 191), 9,0, N 

40 NEXT N,M 



Winfried H. Schumann - PR 



Linha ZX81 



Monitor de programas 



Existem alguns progra- 
mas em Assembler que sao 
executados na RAMTOP 
do micro, e para serem gra- 
vados tern que ser transfe- 
ridos para a area do BASIC. 

A finalidade desta Dica 
e justamente facilitar este 
trabalho. Para usa-la voce 
deve colocar seu programa 
na RAMTOP e seguir os 

?assos abaixo: 
- Coloque no lugar da 
variavel Y o tamanho 
do seu programa em 
codigo de maquina. 
Entre com os POKES 
abaixo: 

POKE 16523, INT 
(X/256) 

POKE 16522, X-PE- 
EK 16523 *256 
POKE 16526, INT 
(Y/2S6) 

POKE 16525, Y-PE- 
EK 16526*256 
onde X e o endereco 



3 - 



2- 



inicial do programa e 
Y a quantidade de 
bytes. 

Execute o programa 

com RUN e NEW 

LINE, mas antes acio- 

ne o gravador com 

RECORD/PLAY. 

Para fazer esta DICA, 

crie a linha 1 REM com 33 

caracteres, e, apos digitar a 

listagem em HEXA, entre 

com o programa em BASIC 

e salve-o em fita. 



}S5!t 59 -i5 t° " •» °° i» " 

J?H £ oa 7S 0i 11 0* C9 CD SB 

16530 40 EB ED BO C9 CD 02 40 

16536 CD 53 04 40 ED BO CO 



a CLEAR 

J DIM A»(VI 

4 RflND U50 16523 

5 5AUE PROGRaMO. 1 ' 

6 RRMD 05R 16535 

7 NEU 



Gilson Roberto Viana - PR. 



Linha APPLE 



TK2000 



Efeito colorido 





Veia o bonito efeito des- 


ta dica: 






ia 


HOtlE 






20 


BR 






30 


FDR ■ 


TO 


39 


35 


COLOR- 


INT 


RND (11 • 7 * 


40 


HLIN 


39 AT 


A 


41 


VLIN 


39 AT 


A 


42 


HLIN 


39 AT 


39 - A 


43 


VLIN 


39 AT 


39 - A 


44 


SOUNDA.A + 1 


A, A * 2 


50 


NEXT ft 






60 


BOTO 30 





Obs.: Se voce possuir um 
Apple, retire a linha 44. 



Jorge Pablo Zapata Rivera - BA. 



Linha TRS-COLOR 



Seno e co-seno no Color 

Este programa faz desenhos abstratos aleatoriamente, 
em alta resolucao, usando comandos como SIN(SENO) 
e COS(CO-SENO), e ocupando apenas 400 bytes (mais 
ou menos). 

Na linha 20, o POKE foi usado para aumentar a velo- 
cidade de processamento do programa (isto pode provo- 
car uma aceleracio no modo de piscar do cursor, que 
pode vol tar ao normal pressionando-se RESET). 

10 ' SIN & COS NO COLOR 

20 L=RND(15> :L1=RND<17) 

30 M=RND<7) :POKE 65495,0 

10 PMODE 4, 1:PCLS: TIMER- 15 

50 A-RND (2) : SCREEN 1,1 

60 FOR r = l TO 7.3 STEP (TIMER/ 200) 

70 Y=SIN(F*14. 16>»55+126 

80 X=COS<F+L>»85->-94 

90 Yl=C0S(F+L)»(75+M)+126:Xl-^SIN(FiLl>« (45iM>+96 

100 LINE <Y,X)-(Y1,X1> ,PSET 

110 LINE -<Y1, X) ,PSET 

120 IF INT (A) =2 THEN LINE - ( Y, X 1 ) , PSET 

130 K=IMT(Y):IF K>11 THEN K-=K-10:SOUND K, 1 

140 NEXT F 

150 FOR F=l TO 4000:NEXT F:RIJN 



Almir Petrecca Martins - SP. 



Linha APPLE 



POKES & CATALOG 

Com os POKEs abaixo, voce pode controlar a amos- 
tragem de arquivos do seu disquete no comando CA- 
TALOG. 

a) Coloca uma parada depois de cada arquivo, pros- 
seguindo com o acionamento de qualquer tecla: 

JPOKE 44599, 234: POKE 44600,234 

b) Com estes POKEs, um & seguido de<RETURN> 
sera interpretado como PRINT CHRS(4) "CATALOG": 

:)POKE 1013, 7b: POKE 1014, 1 10: POKE 1015,165 

Bruno Lopes F. Cabral - PB. 



Linha TRS-80 



RUN em BASIC Disco 

Em seu DOS 500, sempre que desejar que um pro- 
grama seja executado ao colocar o disco use o coman- 

" 0: AUTO BASIC Nome/BAS 

Voce tambSm pode usar este comando para pro- 
gramas em Assembler.bastando retirar o BASIC e, 
se desejar ver o diret6rio logo na entrada, coloque 

apenas: 
r AUTO DIR 

Bruno Lopes F. Cabral - PB. 



Linha 



ZX Spectrum 



O estranho DRAW 

Este programa traz uma boa 
mistura de cores, principalmente 
quando as duas figuras se encon- 
tram. Vale tentar acrescentar mais 
DRAW num loop e ver o que 
acontece. Apos digitar o progra- 
ma, o usuario pode ativar o 
flash, independente de qualquer 
linha, para torna-lo mais interes- 
sante. 



10 rem o estranho drau 

20 FOR J=0 TO 1SS 

30 PLOT .J. -10r DRAU 1,32: DRAU 
OVER 1;20,J DRAU INVERSE 1;1,- 
1 

40 FOR F=l TO 10 

50 PLOT 60, F DRAU OYER 1,60 6 
3 

60 NEXT F 

70 NEXT 

80 GOTO 20 



Antonio Frederico Helvy Dantas - RJ. 



Linha 



TRS-COLOR 



Protegao 
contra o RESET 

Com esta pequena rotina voce 
vai proteger seus programas contra 
um casual ou proposital RESET. 
Colocando esta linha no seu pro- 
grama, toda vez que for pressio- 
nada a tecla RESET ele se auto- 
executara sem precisar de teclar 
RUN novamente. 

10 A=PEEK (116) *256+PEEK < 1 17) -20: 
X=INT (A/256) : Y=A-(X*256) : POKE 11 
3,85:P0KE 114,X:P0KE 115,YSFOR I 
=A TO AU7:READ B:Pl)KE I,B:NEXT 
I: DATA 1(3, 102,255,3, 138, 1, 183,25 
5,3, 189, 173,33,137,172,239.126,1 
73, 158 

Nota: S6 pode ser usado com mi- 
cros que possuem o Extended 
Color BASIC. CP 400 tern. 

Marcos Ortiz - SP. 



Linha ZX Spectrum 



Protegao de programas 



Nesta dica, segue uma sugestao 
para a protecao de seus programas: 

Id POKE 236 13,0 
20 FOR n=l TO 704 
30 PRINT "a"; 

■4-0 NEXT n 



Digite RUN e a tela sera preenchi- 
da com a letra A. Rode de novo o 
programa e tente interrompe-lo com 
BREAK:- Recebera um RESET res- 
posta. 

Joao Eriberto Mota Filho - RJ. 



Linha TRS-80 



Folhas para menus 

A apresentacSo dos menus 
de seus programas ficard mais 
bonita com a utilizacao desta 
dica. Acrescente-a e verd as 
opc5es de acionamento de roti- 
nas no meio da tela dentro de 
"folhas", como fichas de um ar- 
quivo. 



10 'TRS 80 MODCI.DS I/I II 

20 ' FOLHAS ESFERTAS PARA SEUS 

MENUS 
30 'COLOQUL NO MEIO DA TELA 
AS OPCOES [)L ACIONAMENTO DE RC 
TINAS 

40 CLEAR 300:A*-CHR« :176) I 
STRING* (53, 179) +CHRI < 131 ) +CI IRt 
tlTfl H-CHR*<13! ) :D*«STRING*<60, 
110) :i;»-STRING*(29, 140) :D*=£iTR 
1NR*(6H, 176) 

50 CLS : PR 1 N I @2 , At@64 , D*e223, C 
*S?60,D»5 :FORN~0 TO 2:SET(7,N) 
:SET<3,M+2) :MEXI : i-OR 1-1=1 TO 9: 
EET(0,N) :SE1 (A1,N*1) :SET(119,N 
' ISET( 123,N-2) :S1-:T(127,N-1> :ne 
XTIFOR N^I0 TO 17:SET(0,N) :ser 
( I 19, N) :SET!125,N-2) :3ET(I27,N 

-4):Nt-:xi:r-"0R N---120 to 122:set< 

N,45> :SET (Nl -1,1.;) :NEXT 
60 PRINT@16fe, " rECLE<RETURN>" ; 
/0 Y* INKEYtrlF Yt=CHR*(l3)TH 
EM 30 

00 GO'oUB 1 00 
90 GOTO 70 

UK' FOR U-0 TO 800: NEXT: FOR N= 
6:'. TO D7:SET(N,5) : SET (N, 7): RE 
SETIN-1,5) :RESET<N-1,9>:NEXT N 
: RESET (N-I,S) : RESET (N- 1,9) :RET 
URN 

110 'JORGE LUIZ MANGINI SILVA- 
RJ 



Jorge Luiz Mangini Silva - RJ. 






Micro 
Fichas 



MSX 

SUBCOMANDOS DA FUNCAO PLAY 



_, TMIcro 
Slstemas 



SUB- 
COMANDOS 


VALORES 
PERMITIDOS 


FUNCAO 


VALOR 
INICIAL 


Tn 


de 32 a 255 


Determina o andamento da musica. 


120 


On 


de 1 a 8 


Determina uma das 8 oitavas do MSX. 


4 


Ln 


de 1 a 64 


Determina a duragao da nota. 


4 


Nn 


de a 96 


Especifica uma nota musical. 


— 


A#a G# 

A a G 

A a G - 


assume o 
valor de Ln 


Especifica a nota musical, dentro de uma 

oitava predeterminada. 

"#" ou " + " = sustenido e "-" = bemol. 


— 


An - Gn 


de 1 a 64 


Como no quadro anterior, porem com a 
duragao independente de Ln. 


— 


Rn 


de 1 a 64 


Determina uma pausa. 


— 


• 


nao tern 


Aumenta a duragao de uma nota ou de uma 
pausa em 50%. 


— 


Vn 


de a 15 


Determina o volume. 


8 


Mn 


de a 65535 


Determina o perfodo da variagao de volume 

durante a execugao da nota. 


— 


Sn 


de a 15 


Determina o formato do envelope. 


— 




Entire para o nosso time 



Nao deixe o seu talento dentro de uma gaveta. Se voce tem interesse 
em tornar piiblica toda a sua criatividade, escreva para MICRO 
SISTEMAS, pois aqui temos espaco para seus artigos e programas. 

Lembre-se que os textos remetidos a revista devem estar 
datilografados e, caso necessario, ilustrados com exemplos e fotos, 
al6m de figuras ou tabelas; ja os programas devem ser acompanhados 
de copias em disco ou fita, e se possfvel, de listagens impressas ou 
mesmo datilografadas. 

Anexo ao material, o colaborador devera" enviar um breve curn'culo, 
seu enderego e telefone para contatos. 

Todo o material publicado pela revista sera remunerado, e os textos 
nao aproveitados serao devolvidos aos autores. 

Envie seu trabalho para REDACAO/MICRO SISTEMAS: 

RIO - Av. Presidente Wilson, 165/grupo 1210, Centro, CEP: 
20030 - Rio de Janeiro - RJ. 

SAO PAULO - Rua Oliveira Dias, 153, Jardim Paulista, CEP: 
01433 -Sao Paulo - SP. 

•. fe.o LIST para oM.crob9. rfe MS , sobre os 
. ^ ai re , nteu m aan al ,sarea,,p e l oCPOeassa 

mcy nacionais. ^— — 

„ TMicro 
Slstemas 



MS 




COMPUTACAO E INFORMATICA LTOA 



APRESENTA 



SOFT MSX 

APLICATIVOS 

JOGOS 

EDUCATIVOS 




TUD0 EM MICROS 

Cursos -» Hardware 
Suprimentos — » Soft 



ATENDEMOS TODO 
O BRASIL. 
SOLICITE CATALOGO 



AV.CASTELOBRANCO,800 
S. 106 — CEP 65075 
F0NE (098) 227-1615 
SAO LUIS — MA 



C0MPU€LUi 



Um CLUBE MUITO ESPECIAL 
Para usuarios dos equipamentos 
TK-85, TK90X, CP-400, CP-500 

e turn pa live is 



logos 




NOVA FASE 1966 

VOCE RECEBE, INTEIRAMENTE 

GRATIS: 

Um curso complelo de proyramac.ao di 

— Edicoes Mensais do Compuclub 
News, com programas de jogos, 
apltcativos e d i cos especiais para o 
seu equlpamento. 

— A cada 45 dias, programas 
amplamente documentados, com 
seus manuais de inslrucao, 
gravados em fila HOT LINE, a 
melhoropcio para oseu ace rvode 

softs. rr~ 

••Kora 

* l-ttllp ch'a'nc 
«anha 
_ Pernio 
Associando-se agora, vocfi ainda 
recebe os 5 bolelins j.i editados pelo 
clube, incluindo o especial 
dezembro/85. 

Solicile, ainda hoje, informacdes 
detalhadas acerca de como parti a par 
do COMPUCLUB. Nao se esqueca, 
porem, deindicarotipode micro que 
vocfc possui. 
COMPUCLUB — Caixa Postal 46 (36570) Vicosa-MG 





--- d _- z- t 



h i.j \ o - a «a e s 



HlCili CflTftMiCii 

; x , P o s t a l 6 1 i 5 8 

5so Pau io SP 



i_ -_* I* HE v H u -i : 




O "PACOTAO" OFERECE: 



Micros 
• Software 




• Assistencia Tecnica 
IBM/PC, XT e AT 

• Suprimentos 
• Acess6rios Perifericos 

CONSULTE 
NOSSOS PREQOS! 

LIGUE JA! 

(011)276.8988 



C^DAcA=lOAD 

Ruo Luiz Go6s, 1 894 — Soo Paulo 
CtP 04043 - Telex: (Oil) 37755 DTRD 



Que oferece para voce o 



maior acervo do Brasil em 



APPLESOFT? 

Arespostae... 

MAGK 
WORL 

CLUB 



programas para II+ lie e lie. 
Possui sempre as ultimas 





Uvrann PapeLiria Discos & Pitas 



BH SHOPPING 

Completa segao de Informa- 
tica com livros e revistas, e 
revistas, e mais livros de ar- 
te, romances e didatico. 

Atendemos pelo Reembolso 
Postal 

8 lojas em B.H. 




BH SHOPPING 

BR 040 Lj. NL 34 
Fone: 225-8058 
Cx. Postal 1377 



O BEL-BAZAR 
ELETRONICO 



onde voce AINDA 

encontra prego 

e qualidade 

de ANTIGAMENTE! 



PARA PROBLEMAS COM MATERIAL DE 



DESENHO - 
- PAPELARIA - 
ESCRITORIO E 



PINTURA - ENGENHARIA 
ESCRITORIO MAQUINAS P/ 
SUPRIMENTOS EM GERAL 



AV. ALMIRANTE BARROSO, 81 - Lj. "C" 

Tels.: 262-9229 - 262-9088- 240-8410 

CASTELO - RIO DE JANEIRO 



SOFWARE BARATO! 



A ALFAMICRO coloca a sua disposigao os 
melhores programas do mercado interna- 
cional ao menor preco. 

PROGRAMAS PAHA APPLE 

Escolha os seus entre mais de 2.000 titulos 
que cobrem as mais vanadas aplicacoes a 
CzJ 35.00 por disco . 

PROGRAMAS PARA CP-500 

Os mais famosos titulos a CzS 45.00 por 
disco. 

POSSUIMOS TAMBEM PROGRAMAS PA- 
RA IBM-PC • S-700 

Escreva ja! E recebe nosso catalogo. 

ADQUIRA PELO CORREIO PERIFERICOS 
E ASSESS6RIOS PARA APPLE E IBM-PC 
PELOS MELHORES PREQOS. 

CONSULTE-NOS. COBRIMOS QUALQOER 
OFERTAI 

ALFAMICRO INFORMATICA 
Cx. Postal, 12.064 — 02098 
F. 011 - 950-8998 - Sao Paulo - SP 



Graficos 

no TURBO Pascal 



O Z80 e o 6502 



Como foi mostrado no artigo " Versoes do Pascal", publicado em MS n.° 56, 
o TURBO Pascal nao possui capacidade grafica quando utilizado no CP/M 80 
(a versao 3.0 permite graficos no IBM- PC e compativeis). Entretanto, como o 
Pascal vem se tornando uma das linguagens preferidas tanto dos hobbystas 
quanto dos programadores profissionais, vamos apresentar em uma serie de 
artigos as ferramentas necessarias a implantacao de graficos de media e alta 
resolucoes para este compilador. 



Antonio Carlos Salgado Guimaraes 



Esta se"rie sera" dividida em quatro partes. No segmento 
initial, veremos quais sao as ferramentas necessarias pa- 
ra a const rucao de um pacote grafico para media reso- 
luc3o e, posteriormente, trataremos dos grdficos de 
alta resolucao. Ao final de cada segmento, serd apresentado um 
pacote, jd pronto, que sera a juncao de tudo o que foi visto e 

?ue permitird um facil uso das capacidades graficas do Apple, 
om os conhecimentos adquiridos no primeiro segmento, serd 
possivel a implementacao de graficos de media resolucao para 
qualquer linguagem do CP/M que permita o uso do Assembler. 
Quanto aos de alta resolucao, dependera muito da forma como 
uma determinada linguagem ocupa a memoria. Isto ficara 
mais claro quando tratarmos.deste assunto. 

Para que se possa acompanhar este estudo, sera' necessdrio 
que se possua o CP/M80 para o Apple (placa e disco) e o compi- 
lador TURBO Pascal. Um conhecimento bdsico do Z80/8080 
e do 6502 sera" importante, pois usaremos estes microprocessa- 
dores exaustivamente, embora sem grandes malabarismos, isto 
6, de forma bem simples. Pore"m, mesmo os que na"o sabem ou 
n5o gostam do Assembler poderao aproveitar os frutos deste 
estudo, jd que, se digitarem os dois pacotes finais, poderao 
utilizd-los sem grandes problemas. 

Em todos os exemplos que veremos, ser?. estabelecido que 
so existe um drive e que o micro tern 48 Kr de mem6ria. Caso 
o seu micro possua dois drives e mais de 48 Kb, n3o haverd 
problema, pois os exemplos funcionar5o da mesma forma. Ca- 
so voce utilize uma placa de 80 colunas, esta devera ser desliga- 
da, pois tambem estabelecemos que a tela 6 de 24 linhas por 
40 colunas. 



ASSEMBLER NO CP/M 

A primeira providencia que devemos tomar 6 saber utilizar 
o ASM.COM, que e o Assembler que vem com o CP/M. Po- 
re"m, apesar da placa CP/M possuir um Z80, o ASM s6 reco- 
nhece os mnemonicos do 8080. Mesmo assim, existem alguns 
macetes que nos permitirao utilizar o Z80 com toda a sua po- 
tencialidade, como veremos mais tarde. 

Para escrevermos um programa, precisaremos de um editor 
como o ED (tern'vel de se usar), WordStar ou o prdprio editor 



do TURBO Pascal (muito semelhante ao WordStar). Caso voce 
utilize este ultimo, ao ser perguntado se deseja carregar as men- 
sagens de erro, responda N (nao), para que sobre mais espaco 
para o arquivo a ser editado. arquivo criado por qualquer 
um destes editores deverd ter ASM como tipo de arquivo 
(arq. ASM). 

Quando o programa estiver pronto, deveremos usar o ASM 
para assembld -lo. Supondo que o programa esteja no arquivo 
EX1.ASM, deveremos dar o seguinte comando: 

A>ASMEX1 (CR) 
Se tudo correr bem, serd fornecida uma mensagem do tipo: 

nnnn 

mmmH USE FACTOR 

END OF ASSEMBLY 
onde nnnn e mmmH s3o numeros hexadecimais. Qualquer 
outra mensagem deverd ser entendida como mensagem de erro. 

ASM gera dois arquivos, um com terminacao HEX, que 
contem c6digo em hexadecimal do programa assemblado em 
um formato especial, e outro com terminacSo PRN, que con- 
tem a listagem do programa. 

Ap6s havermos assemblado o programa corretamente, de- 
vemos criar um programa executdvel, e para isto devemos 
utilizar o LOAD.COM, que tern por func5o pegar um arquivo 
do tipo HEX e transformd-lo em COM. comando necessdrio 
6; 

A > LOAD EX1 (CR) 
Agora 6 so rodar o programa, o que 6 feito digitando-se o seu 
nome diretamente e dando "CR": 

A > EX1 (CR) 

Na listagem 1 , apresentamos um exemplo no qual imprimi- 
mos algo na tela; na 2, seu equivalente HEX; e na 3, seu equi- 
valente PRN. 

ObservacSes: 

Os dois ultimos caracteres de cada linha da listagem 2 fun- 
cionam como um checksum e dever3o ser utilizados quando 
montarmos o pacote de alta resolucao. • 

Note que na listagem 3 faltam os codigos de algumas letras 
que formam o texto. Isto sempre 6 feito pelo ASM e n3o deve 
ser motivo de preocupac3o. 



Como todos sabem, o microprocessador do Apple 6 o 
6502. Entretanto, quando instalamos a placa de CP/M e 
damos o boot com um disco que tenha sido formatado pelo 
CP/M, quern passa a ser o microprocessador principal 6 o Z80, 
ficando o 6502 responsdvel pela parte I/O. Isto significa que o 
6502 tambe"m continua funcionando e esta a nossa disposicSo. 
Bastard, ent3o, saber como ativd-lo quando for necessdrio. De- 
pois que descobrirmos como isto deve ser feito, teremos capa- 
cidade de utilizar todas as rotinas internas da ROM do Apple, 
principalmente as que tratam da parte grdfica deste micro. Isto 
evitard que tenhamos que desenvolver novas rotinas, as quais, 
atem de serem bastante diftceis de fazer, provavelmente n3o 
seriam tao eficientes e gastariam memoria desnecessariamente. 
Vamos, ent3o, aproveitar o que jd estd feito. 



Figura 1 - Tabela 
de conversao de 
enderecos. 



Z80 


6502 


00000H - 


00FFFH 


51000 


S1FFF 


01000H - 


01FFFH 


$2000 


S2FFF 


02000H - 


02FFFH 


S3000 


$3FFF 


03000H - 


03FFFH 


$4000 


S4FFF 


04000H - 


04FFFH 


$5000 


S5FFF 


05000H - 


OSFFFH 


$6000 


S6FFF 


06000H - 


06FFFH 


S7000 


S7FFF 


07000H - 


07FFFH 


$8000 


S8FFF 


08000H - 


OSFFFH 


S9000 


- S9FFF 


09000H - 


09FFFH 


SA000 


- $AFFF 


0A000H - 


0AFFFH 


SB000 


- SBFFF 


0B000H - 


0BFFFH 


SD000 


- SDFFF (") 


0C000H - 


0CFFFH 


SE000 


- SEFFF 


0D000H - 


0DFFFH 


SF000 


- SFFFF 


OE0O0H - 


0EFFFH 


SCOOO 


- SCFFF (") 


0F000H - 


0FFFFH 


$0000 


- SOFFF (•) 


(*) Embora os enderecos assinalados^ 
estejam fora de ordem, eles estao 
corretos. 



Listagem 1 



EXEMPLO DO USO DO ASM E DO LOAD 
MICRO SISTEMAS - SALBADO 



BDOS 

BOOT EQU 

PRINT EQU 



ORG 100H 
EQU 5 




9 



INICIO: LXI SP, STACK 

LXI D,MES 

MVI C, PRINT 

CALL 5 

JMP 



;reserva stack 
;de aponTa para 

j MENSAGEM 
;FIJNCAO PRINT 
jEXECUTA 

;fim 



MES 



STACK 



DE 

DB 
DB 

DB 
DB 

DS 

END 



10, 13, 'MICRO SISTEMAS' 
10, 13, 'A PRIMEIRA ' 
'REV I ST A BRAS I LE IRA' 
10,13,'DE MICROCOMPU' 
'TADORES' , 10, 13, '*' 



10H 



5AREA DO STACK 



Listagem 2 



: 10010000316601 1 10E010E09CD0500C300000A0D74 
: 1001 10004D4943524F2053495354454D41530A0DC5 
: 1 00 1 20004 1 205052494D4549524 1 2052455649536C 
: 1 00 1 3000544 1 2042524 1 53494C4549524 1 0A0D44D 1 
: 1 00 1 400045204D4943524F434F4D5055544 1 444F24 
: 060150005245530A0D2484 

: oooooooooo 



primeiro passo para descobrirmos como utilizar o 6502 
e" verificar como cada microprocessador reconhece uma posi- 
93o de memoria, jd que uma mesma posigao tern enderecos 
diferentes para Z80 e para o 6502. Por exemplo, o endereco 
S 300 para o 6502 '6 equivalente ao endereco 0F300H para o 
Z80, isto e, fazem referenda 3 mesma posicao de memoria. 
Na figura 1 apresentamos uma tabela para a conversao dos en- 
derecos entre Z80 e 6502. 

Para passarmos parametros, tanto de ida quanto de volta, 
entre o Z80 e 6502, podemos utilizar dois metodos: o pri- 
meiro consiste em colocarmos um dado em uma posicSo de 
mem6ria com um microprocessador e retirar com o outro, 
utilizando a figura 1 . segundo metodo se baseia no uso dos 
registradores (A, X e Y) do 6502. Para isto, usaremos posicOes 
de memoria especiais, de acordo com a tabela abaixo: 



Z80 


6502 


0F045H 


S45-»-Acumulador A 


0F046H 


$46-^Registrador X 


0F047H 


$47-»-RegistradorY 



Obs.: Em alguns manuais do CP/M os registradores X e Y est3o 
com enderecos trocados. 

Para compreendermos melhor como isto funciona, vamos 
supor que uma rotina interna do Apple utilize o dado que 
estiver no Registrador X como parametro de entrada, e que re- 
torne pelo Acumulador um determinado resultado. A estrutura 























Lis 


tac 


jem 3 








1 

! EXEMPLO DO 


USO DO ASM E DO LOAD 






1 

; MICRO SISTEMAS - SALGfiDO 


0100 






ORG 


100H 


0005 


- 


BOOS 


EQU 


5 


0000 


- 


BOOT 


EQU 





0009 


■ 


PRINT 


EQU 


9 


0100 


316601 


INICIO: 


LXI 


SP, STACK SRESERVA STACK 


0103 


110E01 




LXI 


D,MES ;DE APONTA PARA 
; MENSAGEM 


0106 


0E09 




MVI 


C, PRINT 5FUNCA0 PRINT 


0108 


CD0500 




CALL 


5 iEXECUTA 


010B 


C30000 




JMP 


;FIM 


010E 


0A0D4D4943MES 


DB 


10, 13, 'MICRO SISTEMAS' 


011E 


0A0D4 12050 


DB 


10, 13, 'A PRIMEIRA ' 


012B 


5245564953 


DL< 


'REVISTA DRASILEIRA' 


013D 


OA0D444520 


DB 


10, 13, ' DE MICROCOMPU' 


014C 


5441444F52 


DB 


'TADORES' , 10, 13, '«' 


0156 




STACK 


DS 


10H ;AREA DO STACK 


0166 






END 
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MICRO SISTEMAS, junho/86 



MICRO SISTEMAS, junho/86 
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grAficos no turbo pascal 



que deveremos montar devcra ser algo do tipo: 



REGA 
REGX 
MVI 
STA 



EQU 0F045H 
EQU 0F046H 
A.DADO 
REGX 



LDA REGA 



; Coloca o dado em A 

; Coloca A em REGX (parame- 

tro de entrada) 

; Executa a chamada do 6502 

; Pega o valor de retorno 



Agora a parte mais importante: como ativar o 6502. Para 
isto, usaremos duas outras posic5es de mcmoria especiais, que 
slo: 

0F3DEH — +■ cont6m o endereco da placa de CP/M. 

0F3D0H — *- local em que se coloca o endereco da rotina 
escrita em Assembler no 6502. 

Ap6s o endereco da sub -rotina ter sido colocado no local 
correto (0F3D0H), bastard utilizarmos uma instrucao que co- 
loque algo no endereco da placa. 

Para que este mecanismo fique claro, veremos dois exem- 
plos. No primeiro (listagem 4) temos urn programa que da" um 
beep, utilizando uma rotina interna do Apple. Para isto, utili- 
zaremos a rotina BELL2 ($FBE4). No segundo exemplo 
(listagem 5), utilizaremos a rotina interna PRTYX (SF940) 
que tern por funclo imprimir o conteudo dos registradores X e 
Y. 

Bibliografia 

H., THOM, CP/M Guia do Usuario; 

L., JON, CP/M Assembly Language; 

L., LANCE, Z80 Assembly Language Programming; 

W., NAT, Z80 Instruction Handbook; 

J., KATHLEN; W., NKLAUS, Pascal User Manual and Report; 

G., PETER, Programing in Pascal; 



Listagem 4 



A> 
; 

EXEMPLO DO USO DO 6502 PELO ZBO 

MICRO SISTEMAS - SALGADO 

ORS 100H 

LZBO EQU OF3DEH 

L6502 EQU 0F3D0H 

BELL2 EQU 0FBE4H 

BOOT ■ EQU OOOOOH 

INICIO: LXI SP, STACK ; RESERVA STACK 
LXI H,BELL2 ! COLOCA EM HL 
; ENDERECO DA 
SSUBROTINA 
; COLOCA HL NO 
; ENDERECO DADO 
; POR L6502 
;PEGA ENDERECO 
;DA PLACA 
! COLOCA VALOR 
;DE A <NAO IMPOR- 
; TA VALOR) E 
; EXECUTA 
; RETORNA 



SHLD L6502 



LHLD LZSO 



MOV M,A 



JMP BOOT 



10H 



3TACK 



R., J. S.; B., H. J., Programming via Pascal; 

S., JEFFREY, Apple Graphics & Arcade Game Design; 

W., KEN;K., BOB;K., LISA, Apple II Computer Graphics; 

L., WILLIAN, What's Where in the Apple; 

BORLAND INTERNATIONAL, Turbo Pascal - Reference 

Manual; 

MICROSOFT CORPORATION, Microsoft Softcard System 

for Apple II — Instalation and Operation Manual. 























Listagem 5 




5 EXEMPLO DO 


USO DO 


6502 PELO ZSO 






;TA G VALOR) E 


!• 












; EXECUTA 


; MICRC 


SISTEMAS 


ALGADO 








; 








IXMPRIME OS NUMEROS. 


DEVERA' APARECER 




ORG 


1 OOH 




; 1020 


NA TELA 




LZSO 


EQU 


0F3DEH 










L6502 


EQU 


0F3D0H 






MVI A, 01 OH 




HOME 


EQU 


0FC5SH 






STA REGY 


;Y - 10H 


PRTYX 


EQU 


0F940H 






MVI A.020H 




REGX 


EQU 


0F046H 






STA REGX 


; X = 20H 


REGY 


EQU 


0F047H 






LXI H, PRTYX 




BOOT 


EQU 


OOOOOH 






SHLD L6S02 




5 










LHLD LZ80 




INICIO: 


LXI 


SP,STAC 


K ; RESERVA STACK 




MOV M,A 




5LIMPA 


A TELA USANDO 


HOME DO APPLE 


i 


JMP BOOT 


; RETORNA 


J 


LXI 

SHLD 

LHLD 
MOV 


H,HOME 

L6502 

LZSO 
M,A 


; COLOCA EM HL 

; ENDERECO DA 

SSUBROTINA 

j COLOCA HL NO 

; ENDERECO DADO 

J POR L6502 

j pega endereco 
;da placa 
; coloca valor 
;de a (nao impor- 


STACK 


DS 1 OH 

END 
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PROGRAMAS PARA MSX (EXPERT E HOT- BIT) 

ClENCIA moderna de computacao ltda. 

Av. Rio Branco, 1 56 - Sub-Solo - Loja 127 - CEP 20.043 - Centro - RJ 
Tels.: (021) 262-5723 ou 240-9327 



Of 



ITEM TITULO 



201 EDORAF 



202 HUNCH BACK > 



203 
204 

203 

206 

207 

208 

209 

210 

211 
212 

213 

214 



COSMOS 
HOT SHOE 



CANNON FIGHTER- 
CATABALAO > 

PYRAMIDS > 

BINARY LAND > 

DOG-FIGHTER > 

FLIPPER > 

FAIXA PRETA --> 
NORSEMAN > 

THEZEUS > 

DECATHLON > 



EDITOR GRAFICO. COM O QUAL VOCE PODE- 
RA DESENHAR E PROJETAR O QUE SEU 

POTENCIAL FOR CAPAZ 

TENTE ESCAPAR DO CASTELO SEH SER PEGO 

PELOS GUARDAS 

DESTRUA AS NAVES ESPACIASI COSMICAS. . 
DESVIE DOS ASTEROIDES ATE ENCONTRAR 

REATOR NUCLEAR 

SALVE SEU DEPOSITO DE MANTIMENTOS DO A- 
TAOUE DOS TANQUES INIMIGOS. SENSAC IONAL. 
TENTE APANHAR O MAIOR NUMERO DE BALOES 
POSSIVEL.CUIDADO COM O OXIGENIO DISPO- 
NIVEL. DESTRUA OS PASSAROS INIMIGOS.. 

ACHE O TESOURO NO LABIRINTO SEM SER PE- 
GO PELOS MORCEGOS ESCORPIOES E A MUMIA. 
MATE A ARANHA. DESTRUA AS TEIAS E PEGUE 

TODOS OS OBJETOS DO LABIRINTO 

VOCE EH PILOTO DE UM CACA E ESTA EM COM- 

BATE. TENTE DESTRUIR SEUS INIMIGOS 

IGUAL AO TRADICIONAL FLIPPER DO FLIPERA- 

MA.SENSACIONAL 

LUTA DE KARATE 

NAO DEIXE QUE OS MONSTROS PEGUEM A BARRA 

DE OURO QUE ESTA SOB SUA PROTECAO 

LIBERTE A PRINCESA QUE ESTA PRESA NUMA 
SALA DO LABIRINTO. EVITE SER PEGO TAMBEM. 
SEJA UM CAMPEAO. PARTICIPE DAS PROVAS 



215 COLUMBIA > VOCE ESTA INVADINDO OUTRO PLANETA EVI- 

TE SER DESTRUIDO PELOS CACAS E MISSEIS 
INIMIGOS. DEVERAS SENSAC IONAL 

216 PITFALL II > ACHE AS BARRAS DE OURO E EVITE OS PERX- 

GOS EXISTENTES. MUITO BOM 

217 RIVER RAID > SUA MISSAO E DESTRUIR OS INIMIGOS NO 

RIO RAID 

218 HYPER SPORTS I> SEJA UM ATLETA . GANHE BONUS COM SUA 

EXIBICAO 



30.00 
30,00 

30,00 

30,00 

30.00 

30.00 

SO , 00 

30.00 

50.00 
30,00 

50.00 

30.00 



30.00 
30,00 
30.00 
50,00 



219 
220 



222 

223 
224 

229 

226 

227 

228 

229 

230 
231 
232 
233 

234 
239 
236 



MR. CHIN > 

MACACO 
ACADEMICO > 



HYPER SPORTS II 

HERO > 

GALAGA > 

LE MANS > 

CORRIDA MALUCA- 

PATRULHA LUNAR 

EDITOR DE TEXTO 

TOOUE > 

XADREZ > 

ROAD FIGHTER -> 

PASCAL > 

KEYSTONE KAPERS 

PADEIRO MALUCO- 
MALA DIRETA — 
CONTROLE DE 
ESTOOUE 



MANTENHA SUA FAMA DE MAIOR EOUILIBRISTA 

ACHE O NUMERO CORRETO PARA COMPLETAR A 
SENTENCA MATEMATICA, MAS CUIDADO COM OS 
CARANGUEIJOS QUE LHE PERSEGUEM 30.00 

.SENSACIONAL CONTINUACAO DO HYPER 

SPORTS I 50 . 00 

RESGATE OS PRISIONEIROS DE UMA ESTRANHA 

PRISAO. MARAVILHOSO 30.00 

SENSACIONAL JOGO ONDE SUA PERICIA DE 

PILOTO SERA TESTADA A TODO MOMENTO 30.00 

PARTICIPE DE UMA CORRIDA DE FORMULA I.. 30.00 

APANHE AS BANDEIRAS PELO LABIRINTO MAS 
CUIDADO COM COMBUSTIVEL. SENSACIONAL. 50,00 

-RETORNE A SUA BASE APOS UMA SAIDA DE 
RECONHECIMENTO 30,00 

-EM PORTUGUES.FACA SUAS CORRESPONDENCIAS 

E ARQUIVOS 80.00 

SUAS HABILIDADES DE MUSICO SERAO TESTA- 
DAS COM ESTE PROGRAMA. DIVERSOB RITMOS.. BO, 00 
TRADICIONAL JOGO DE XADREZ EM 6 NIVEIS 30,00 

SENSACIONAL CORRIDA DE FORMULA I 50,00 

COMPILADOR PASCAL. . .MANUAL EM CASTELHANO 100,00 

-COMO POLICIAL. EVITE OUE O LADRAO FUJA 
COM DINHEIRO ROUBADO 50.00 

>AJUDE O PADEIRO A FABRICAR SEUS PAES. . . . 50,00 

>P0DER0S0 BANCO DE DADOS PARA EMISSAO DE 



> CONTROLE 
ARQUIVO. i 



SEU ESTOQUE ATE 100 ITENS POR 



»*«OBS. : TODOS OS PROGRAMAS ACOMPANHAO MANUAL EM PORTUGUES. 



Desejo receber os seguintes programas pelo(s) qual(is) pagarei a quantia de Cr$_ 

N°s PROGRAMAS: 

NOME: 

END.: 

CI DADE : 



UF.: 



CEP: 



Para tal estou enviando um cheque nominal a Ciencia Moderna de Computacao Ltda. Despesas de Correio inclusa. 



COMUNICACAO ENTRE MICROS PARA 
TRANSFERENCE DE ARQUIVOS 



O TRANSFERE e a solucao para o seu problema 
de ter varios micros com formatos de disquete 
incompatfveis. 

Com o TRANSFERE voce pode transferir arquivos 
entre micros atraves de uma ligacao por cabo 
usando as interfaces seriais. 

Na tabela ao lado voce encontra as caracteristicas 
mais importantes do TRANSFERE. Compare -o 
com os concorrentes. 

PRECOS POR MICRO: 

CzS 2.000,00 - Compativeis com APPLE CP/M 
CzS 3.000,00 - Outros micros CP/M 
Cz$ 4.000,00 - Compativeis com IBM PC 

Os sistemas da INTELSOFT sao operados atraves 
de menus e acompanhados por manuais que 
descrevem detalhadamente a sua utilizacao. 
Qualquer pessoa pode opera-los mesmo que nao 
tenha nenhum conhecimento de computacao. 



INTELSOFT 



CARACTERISTICAS. 



Permite a transferSncia de arquivos entre 
micros CP/M e micros compativeis com o 
IBM PC com MS-DOS. 



Faz a transmissao usando um protocolo de 
verif icacao com correcao automat ica de 
erros. 



Transmite qualquer tipo de arquivo, como 
programas, textos ou dados. 



Permite transmitir varios arquivos com um 
unico comando, usando a convencao de ? e 
* para especif icar o grupo. 



A operecao e feita em apenas um dos 
micros, o outro responde automat icamente. 



Pode acessar qualquer unidade de d isco 
conectada ao micro, inclusive discos rigidos 
tipo Winchester. 



Permite emular um terminal com protocolo 
tipo TTY, para conexao com minis e 
servicos de informacSo. 



Trabalha com velocidade de transmissao 
de ate 9600 bauds. 



Mais de duzentas c6pias instaladas. Princi- 
pals clientes: PETROBRAS, INTERBRAS, 
SHELL, MINISTERIO DA FAZENDA, DHL 
CIA DOCAS DO CEARA, ELETROSUL. 



OUTROS PRODUTOS: 



DISQUE BOLSA 

Permite ligacao com a BVRJ para 
obter cotacoes e dados hist6ricos de 
acoes. Os dados sao armazenados em 
disco para consultas e emissao de 
relator ins, podendo tambem sertrans- 
feridos para uso por outros pacotes. 

PRECO: CzS 10.000,00 



CONTABILIDADE GERAL 
Funciona em modo on-line e suporta 
ate 65.000 comas ou lancamentos 
por m6s. O Piano de comas 6 def ini- 
tio pelo usuario e os dados podem ser 
manipulados por pacotes como o 
LOTUS e o dBASE. 

PRECO: CzS 15 000,00 



Escreva ou telefone 
para receber folhetos 
com informagoes 
detalhadas sobre 
nossos produtos. 

(021) 265-3346 



INT ELSOFT Projeto e Desenvolvimento de Sistemas S/C Ltda. 
Praia do Flamenqo 66 Sala 1104 CEP 22210 - Rio de Janeiro - RJ 



EMPRESA FILIADA A ASSESPRO 







SWENSSON, Q.; GOMES, J. P.; 
Lotus 1-2-3, Livros Tecnicos e 
Cientificos Editors. 

O livro 6 dividido em tres 
blocos principals. No primeiro de- 
les, o autor apresenta uma visao 
basica do Lotus 1 -2-3, abordando 
seus comandos mais usados. A se- 
guir, na parte 2, ele enfoca outros 
comandos do menu principal 
I/Worksheet; /Range; /Copy; /File; 
/Print; /Graph), o que torna pos- 
sivel o desenvolvimento de varios 
tipos de aplicacao. 

Finalmente, sao apresentados 
recursos adicionais do 1-2-3, co- 
mo impressaode graficos (PRINT- 
GRAPH); DATA (/D) e Macros. 

WATANABE, R. M., Guia do 
Programador D.O.S., Editora 
Aleph. 

O Guia do Programador DOS 
destina-se a usuarios ja familiari- 
zados com, pelo menos, as opera- 
coes usuais do DOS e Assembler 
do microprocessador 6502. E re- 
comendavel tamb^m o estudo pr6- 
vio do BASIC Applesoft e Assem- 
bly 6502. 

Sao abordadas questoes do ti- 
po como aumentar a capacidade 



de armazenamento; como melho- 
rar o tempo de acesso; as formas 
de proteger os dados contra c6- 
pias; como recuperar arquivos 
perdidos acidentalmente etc. 

HOFFMAN, P., MSX - Guia 
do Usuirio, Editora 
MacGraw-Hill. 

Mais que um guia, este livro 6 
um complemento aos manuais 
desta linha de computadores que 
nao pode faltar na estante dos 
usua>ios. Em linguagem simples e 
eficaz, o autor consegue explicar 
desde as caracterfsticas basicas da 
maquina ate 1 suas mais complica- 
das funcoes, sempre com exem- 
plos pniticos e tabelas esclarece- 
doras. livro contem inclusive 
dicas que nao estao nos manuais, 
tais como enderecos de acesso a 
algumas rotinas da ROM do equi- 
pamento e enderecos importantes 
que controlam o BASIC MSX. 

CHRISTMANN. R. U., 
Visitrend/Visiplot — Guia do 
Usuario Brasileiro, Editora 
Campus. 

Parte integrante da seVie "Guia 
do Usuario Brasileiro", este e um 



manual pratico de utilizacao do 
Visitrend/Visiplot. Nele o autor 
fornece os conhecimentos neces- 
sarios para o uso destes pacotes; 
aborda suas possibilidadesde apli- 
cacao; entrada de dados e os di- 
versos tipos de graficos. 

Estes sao alguns dos assuntos 
contidos nos capftulos: Menu do 
Visilot; Como entrar com dados; 
Graficos de linha, barras, confron- 
ts, circulares, mi'nimos e maxi- 
mos; e Calculos estatfsticos. Ha 
ainda um capi'tulo "Desafio", pa- 
ra que o leitor possa testar o que 
aprendeu. 

ENDERECOS DAS EDITORAS 



Aleph Editora — Av. 
Brigadeiro Faria Lima, 1451, 
Conj. 31, CEP 01451, tel.: (011) 
813-4555; 

Editora Campus — Rua Barao 
de Itapagipe, 55, CEP 20261, 
tel.: (021) 284-8443; 

Livros Tecnicos e Cientificos 
Editora — Rua Vieira Bueno, 21, 
Sao Crist6vao, CEP 20920; 
. Editora McGraw-Hill — Rua 
Tabapua, 1105. CEP 04533, 
tel.: (011) 280-6622. Itaim Bibi, 
Sao Paulo. 



• A partir deste niimero, MS 
passara a publicar uma relacao de 
todos os livros recebidos em sua 
redacao durante o mSs. 

• Aleph Editora — Aprofundar 
do-se no MSX. 

• Editora Campus — Contabili 
dade Sistemica em Microcomputa- 
dores; Visicalc - Guia do UsuaVio 
Brasileiro: Como Proqramar seu 
PC; LOGO — Introducao ao poder 
do ensino atrav6s da programacSo; 
Inforrnatica, uma introducao. 

• Livros Tecnicos e Cientificos 
Editora - Cartao de Referenda 
dBase II; Cartao de Referenda 
dBase III. 

• Editora McGraw-Hill — Assem- 
bler para o TK90X; MUMPS - 
Guia do UsuSrio; MS - DOS - 
Guia do Operador, Comandos BA- 
sicos; dBase III — Guia do Opera- 
dor, Comandos Bas"icos; dBase II 
— Guia do Operador, Comandos 
Bdsicos 

• Petit Editora — Construa seu 
computador por meio salano mi- 
nimo. 

• SCI Editora — Conceitos, pro- 
blemas e prdtica de gere"ncia para 
profissionais de inforrnatica: dire- 
trizes e normas. 
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Obs.: na Capital entregamos a domicilio. 
Consulte-nos. 

Av. Sao Lulz, 187 - Lo)a 8 - 1; Sobrelo|B - 

Li vraria Sistema cEp 01 ^]:'q^I M eTr6poie - sao pauio 
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Programas para 
TK 90X que falam nossa lingua. 



FinalmentB, uma empresa nacional assumiii uma 

Fatitude brasileira: editar programas e jogos para TK 90X 

em portugu@s-A Disprosofteslalainjando 

programas infiditos na Brasil. 



Sao jogos animados.inteligentes, programas com 
aplicagoes profissionais, educacionais, 
conierciais e utilitarios. Procure o seu programs, 
nas molhorus lojas. 



ya^mgoSjS^ 
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AMmUgtallamoIKMBle 

6 tira os 8 am He atraso k micro brasileira. 
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/MICRODIGITAL 



Chega ao Brasil o sucessor do Apple He' "Enhanced". 



Tire da cabeca tudo que voc6ja im, lent «/ vrn em materia de 
micros em geral e Apples em particular. 
( a pnmeira vez que chega ao flrasil um Apple ultimo modelo- 
o TK 3000 lie 6 oma wnao arnda mais avant^da da 
gvanqgdissimo Apple He "Enhanced", laneado em main de 138b 

niosUnidos, 
E o unico que roda Tola/works a Supewatc 3a, enlre milhares de 
outros. Faz em ssgundos a que os demais micros levam 
intermindvers minutos para lam, torn momdria basics de Si 
Kbytes lexpandivei com placas atdl Megabyte! a ledddo 
iwtnliriea mcorpuradu 

Esctbvb em portugucs com lodas as leiras c acentos (t com 
maior laaliriadti do que utna maquina de esctmr eleiiimca 



E, entre outras exdusrvidades, tem urn design anaiomico, para 
mator confano do operador e produiividade no trabslrso, 
Lfenfi a logo amhecar eresenaroseuTK 3000 He nas 
Revendedores Auiorimtos Microdigital. 
Os B arms lecnologia que a separam dos outros micros, podem 
ser emlameme a distancia que voce vai colocar enlre sua 
emprssa e os concorrenies. 

mOBOEe 

/MICRODIGI14L 



